fs/btrfs/disk-io.c

   1 /*
   2  * Copyright (C) 2007 Oracle.  All rights reserved.
   3  *
   4  * This program is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU General Public
   6  * License v2 as published by the Free Software Foundation.
   7  *
   8  * This program is distributed in the hope that it will be useful,
   9  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  10  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  11  * General Public License for more details.
  12  *
  13  * You should have received a copy of the GNU General Public
  14  * License along with this program; if not, write to the
  15  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  16  * Boston, MA 021110-1307, USA.
  17  */
  18
  19 #include <linux/module.h>
  20 #include <linux/fs.h>
  21 #include <linux/blkdev.h>
  22 #include <linux/crc32c.h>
  23 #include <linux/scatterlist.h>
  24 #include <linux/swap.h>
  25 #include <linux/radix-tree.h>
  26 #include <linux/writeback.h>
  27 #include "ctree.h"
  28 #include "disk-io.h"
  29 #include "transaction.h"
  30 #include "btrfs_inode.h"
  31
  32 u64 bh_blocknr(struct buffer_head *bh)
  33 {
  34         return bh->b_blocknr;
  35 }
  36
  37 static int check_tree_block(struct btrfs_root *root, struct buffer_head *buf)
  38 {
  39         struct btrfs_node *node = btrfs_buffer_node(buf);
  40         if (bh_blocknr(buf) != btrfs_header_blocknr(&node->header)) {
  41                 printk(KERN_CRIT "bh_blocknr(buf) is %llu, header is %llu\n",
  42                        (unsigned long long)bh_blocknr(buf),
  43                        (unsigned long long)btrfs_header_blocknr(&node->header));
  44                 return 1;
  45         }
  46         return 0;
  47 }
  48
  49 struct buffer_head *btrfs_find_tree_block(struct btrfs_root *root, u64 blocknr)
  50 {
  51         struct address_space *mapping = root->fs_info->btree_inode->i_mapping;
  52         int blockbits = root->fs_info->sb->s_blocksize_bits;
  53         unsigned long index = blocknr >> (PAGE_CACHE_SHIFT - blockbits);
  54         struct page *page;
  55         struct buffer_head *bh;
  56         struct buffer_head *head;
  57         struct buffer_head *ret = NULL;
  58
  59
  60         page = find_lock_page(mapping, index);
  61         if (!page)
  62                 return NULL;
  63
  64         if (!page_has_buffers(page))
  65                 goto out_unlock;
  66
  67         head = page_buffers(page);
  68         bh = head;
  69         do {
  70                 if (buffer_mapped(bh) && bh_blocknr(bh) == blocknr) {
  71                         ret = bh;
  72                         get_bh(bh);
  73                         goto out_unlock;
  74                 }
  75                 bh = bh->b_this_page;
  76         } while (bh != head);
  77 out_unlock:
  78         unlock_page(page);
  79         page_cache_release(page);
  80         return ret;
  81 }
  82
  83 int btrfs_map_bh_to_logical(struct btrfs_root *root, struct buffer_head *bh,
  84                              u64 logical)
  85 {
  86         if (logical == 0) {
  87                 bh->b_bdev = NULL;
  88                 bh->b_blocknr = 0;
  89                 set_buffer_mapped(bh);
  90         } else {
  91                 map_bh(bh, root->fs_info->sb, logical);
  92         }
  93         return 0;
  94 }
  95
  96 struct buffer_head *btrfs_find_create_tree_block(struct btrfs_root *root,
  97                                                  u64 blocknr)
  98 {
  99         struct address_space *mapping = root->fs_info->btree_inode->i_mapping;
 100         int blockbits = root->fs_info->sb->s_blocksize_bits;
 101         unsigned long index = blocknr >> (PAGE_CACHE_SHIFT - blockbits);
 102         struct page *page;
 103         struct buffer_head *bh;
 104         struct buffer_head *head;
 105         struct buffer_head *ret = NULL;
 106         int err;
 107         u64 first_block = index << (PAGE_CACHE_SHIFT - blockbits);
 108
 109         page = find_or_create_page(mapping, index, GFP_NOFS);
 110         if (!page)
 111                 return NULL;
 112
 113         if (!page_has_buffers(page))
 114                 create_empty_buffers(page, root->fs_info->sb->s_blocksize, 0);
 115         head = page_buffers(page);
 116         bh = head;
 117         do {
 118                 if (!buffer_mapped(bh)) {
 119                         err = btrfs_map_bh_to_logical(root, bh, first_block);
 120                         BUG_ON(err);
 121                 }
 122                 if (bh_blocknr(bh) == blocknr) {
 123                         ret = bh;
 124                         get_bh(bh);
 125                         goto out_unlock;
 126                 }
 127                 bh = bh->b_this_page;
 128                 first_block++;
 129         } while (bh != head);
 130 out_unlock:
 131         unlock_page(page);
 132         if (ret)
 133                 touch_buffer(ret);
 134         page_cache_release(page);
 135         return ret;
 136 }
 137
 138 static int btree_get_block(struct inode *inode, sector_t iblock,
 139                            struct buffer_head *bh, int create)
 140 {
 141         int err;
 142         struct btrfs_root *root = BTRFS_I(bh->b_page->mapping->host)->root;
 143         err = btrfs_map_bh_to_logical(root, bh, iblock);
 144         return err;
 145 }
 146
 147 int btrfs_csum_data(struct btrfs_root * root, char *data, size_t len,
 148                     char *result)
 149 {
 150         u32 crc;
 151         crc = crc32c(0, data, len);
 152         memcpy(result, &crc, BTRFS_CRC32_SIZE);
 153         return 0;
 154 }
 155
 156 static int csum_tree_block(struct btrfs_root *root, struct buffer_head *bh,
 157                            int verify)
 158 {
 159         char result[BTRFS_CRC32_SIZE];
 160         int ret;
 161         struct btrfs_node *node;
 162
 163         ret = btrfs_csum_data(root, bh->b_data + BTRFS_CSUM_SIZE,
 164                               bh->b_size - BTRFS_CSUM_SIZE, result);
 165         if (ret)
 166                 return ret;
 167         if (verify) {
 168                 if (memcmp(bh->b_data, result, BTRFS_CRC32_SIZE)) {
 169                         printk("btrfs: %s checksum verify failed on %llu\n",
 170                                root->fs_info->sb->s_id,
 171                                (unsigned long long)bh_blocknr(bh));
 172                         return 1;
 173                 }
 174         } else {
 175                 node = btrfs_buffer_node(bh);
 176                 memcpy(node->header.csum, result, BTRFS_CRC32_SIZE);
 177         }
 178         return 0;
 179 }
 180
 181 static int btree_writepage(struct page *page, struct writeback_control *wbc)
 182 {
 183         struct buffer_head *bh;
 184         struct btrfs_root *root = BTRFS_I(page->mapping->host)->root;
 185         struct buffer_head *head;
 186         if (!page_has_buffers(page)) {
 187                 create_empty_buffers(page, root->fs_info->sb->s_blocksize,
 188                                         (1 << BH_Dirty)|(1 << BH_Uptodate));
 189         }
 190         head = page_buffers(page);
 191         bh = head;
 192         do {
 193                 if (buffer_dirty(bh))
 194                         csum_tree_block(root, bh, 0);
 195                 bh = bh->b_this_page;
 196         } while (bh != head);
 197         return block_write_full_page(page, btree_get_block, wbc);
 198 }
 199
 200 static int btree_readpage(struct file * file, struct page * page)
 201 {
 202         return block_read_full_page(page, btree_get_block);
 203 }
 204
 205 static struct address_space_operations btree_aops = {
 206         .readpage       = btree_readpage,
 207         .writepage      = btree_writepage,
 208         .sync_page      = block_sync_page,
 209 };
 210
 211 int readahead_tree_block(struct btrfs_root *root, u64 blocknr)
 212 {
 213         struct buffer_head *bh = NULL;
 214         int ret = 0;
 215
 216         bh = btrfs_find_create_tree_block(root, blocknr);
 217         if (!bh)
 218                 return 0;
 219         if (buffer_uptodate(bh)) {
 220                 ret = 1;
 221                 goto done;
 222         }
 223         if (test_set_buffer_locked(bh)) {
 224                 ret = 1;
 225                 goto done;
 226         }
 227         if (!buffer_uptodate(bh)) {
 228                 get_bh(bh);
 229                 bh->b_end_io = end_buffer_read_sync;
 230                 submit_bh(READ, bh);
 231         } else {
 232                 unlock_buffer(bh);
 233                 ret = 1;
 234         }
 235 done:
 236         brelse(bh);
 237         return ret;
 238 }
 239
 240 struct buffer_head *read_tree_block(struct btrfs_root *root, u64 blocknr)
 241 {
 242         struct buffer_head *bh = NULL;
 243
 244         bh = btrfs_find_create_tree_block(root, blocknr);
 245         if (!bh)
 246                 return bh;
 247         if (buffer_uptodate(bh))
 248                 goto uptodate;
 249         lock_buffer(bh);
 250         if (!buffer_uptodate(bh)) {
 251                 get_bh(bh);
 252                 bh->b_end_io = end_buffer_read_sync;
 253                 submit_bh(READ, bh);
 254                 wait_on_buffer(bh);
 255                 if (!buffer_uptodate(bh))
 256                         goto fail;
 257         } else {
 258                 unlock_buffer(bh);
 259         }
 260 uptodate:
 261         if (!buffer_checked(bh)) {
 262                 csum_tree_block(root, bh, 1);
 263                 set_buffer_checked(bh);
 264         }
 265         if (check_tree_block(root, bh))
 266                 goto fail;
 267         return bh;
 268 fail:
 269         brelse(bh);
 270         return NULL;
 271 }
 272
 273 int clean_tree_block(struct btrfs_trans_handle *trans, struct btrfs_root *root,
 274                      struct buffer_head *buf)
 275 {
 276         WARN_ON(atomic_read(&buf->b_count) == 0);
 277         clear_buffer_dirty(buf);
 278         return 0;
 279 }
 280
 281 static int __setup_root(int blocksize,
 282                         struct btrfs_root *root,
 283                         struct btrfs_fs_info *fs_info,
 284                         u64 objectid)
 285 {
 286         root->node = NULL;
 287         root->inode = NULL;
 288         root->commit_root = NULL;
 289         root->blocksize = blocksize;
 290         root->ref_cows = 0;
 291         root->fs_info = fs_info;
 292         root->objectid = objectid;
 293         root->last_trans = 0;
 294         root->highest_inode = 0;
 295         root->last_inode_alloc = 0;
 296         memset(&root->root_key, 0, sizeof(root->root_key));
 297         memset(&root->root_item, 0, sizeof(root->root_item));
 298         root->root_key.objectid = objectid;
 299         return 0;
 300 }
 301
 302 static int find_and_setup_root(int blocksize,
 303                                struct btrfs_root *tree_root,
 304                                struct btrfs_fs_info *fs_info,
 305                                u64 objectid,
 306                                struct btrfs_root *root)
 307 {
 308         int ret;
 309
 310         __setup_root(blocksize, root, fs_info, objectid);
 311         ret = btrfs_find_last_root(tree_root, objectid,
 312                                    &root->root_item, &root->root_key);
 313         BUG_ON(ret);
 314
 315         root->node = read_tree_block(root,
 316                                      btrfs_root_blocknr(&root->root_item));
 317         BUG_ON(!root->node);
 318         return 0;
 319 }
 320
 321 struct btrfs_root *btrfs_read_fs_root_no_radix(struct btrfs_fs_info *fs_info,
 322                                                struct btrfs_key *location)
 323 {
 324         struct btrfs_root *root;
 325         struct btrfs_root *tree_root = fs_info->tree_root;
 326         struct btrfs_path *path;
 327         struct btrfs_leaf *l;
 328         u64 highest_inode;
 329         int ret = 0;
 330
 331         root = kzalloc(sizeof(*root), GFP_NOFS);
 332         if (!root)
 333                 return ERR_PTR(-ENOMEM);
 334         if (location->offset == (u64)-1) {
 335                 ret = find_and_setup_root(fs_info->sb->s_blocksize,
 336                                           fs_info->tree_root, fs_info,
 337                                           location->objectid, root);
 338                 if (ret) {
 339                         kfree(root);
 340                         return ERR_PTR(ret);
 341                 }
 342                 goto insert;
 343         }
 344
 345         __setup_root(fs_info->sb->s_blocksize, root, fs_info,
 346                      location->objectid);
 347
 348         path = btrfs_alloc_path();
 349         BUG_ON(!path);
 350         ret = btrfs_search_slot(NULL, tree_root, location, path, 0, 0);
 351         if (ret != 0) {
 352                 if (ret > 0)
 353                         ret = -ENOENT;
 354                 goto out;
 355         }
 356         l = btrfs_buffer_leaf(path->nodes[0]);
 357         memcpy(&root->root_item,
 358                btrfs_item_ptr(l, path->slots[0], struct btrfs_root_item),
 359                sizeof(root->root_item));
 360         memcpy(&root->root_key, location, sizeof(*location));
 361         ret = 0;
 362 out:
 363         btrfs_release_path(root, path);
 364         btrfs_free_path(path);
 365         if (ret) {
 366                 kfree(root);
 367                 return ERR_PTR(ret);
 368         }
 369         root->node = read_tree_block(root,
 370                                      btrfs_root_blocknr(&root->root_item));
 371         BUG_ON(!root->node);
 372 insert:
 373         root->ref_cows = 1;
 374         ret = btrfs_find_highest_inode(root, &highest_inode);
 375         if (ret == 0) {
 376                 root->highest_inode = highest_inode;
 377                 root->last_inode_alloc = highest_inode;
 378         }
 379         return root;
 380 }
 381
 382 struct btrfs_root *btrfs_read_fs_root(struct btrfs_fs_info *fs_info,
 383                                       struct btrfs_key *location)
 384 {
 385         struct btrfs_root *root;
 386         int ret;
 387
 388         root = radix_tree_lookup(&fs_info->fs_roots_radix,
 389                                  (unsigned long)location->objectid);
 390         if (root)
 391                 return root;
 392
 393         root = btrfs_read_fs_root_no_radix(fs_info, location);
 394         if (IS_ERR(root))
 395                 return root;
 396         ret = radix_tree_insert(&fs_info->fs_roots_radix,
 397                                 (unsigned long)root->root_key.objectid,
 398                                 root);
 399         if (ret) {
 400                 brelse(root->node);
 401                 kfree(root);
 402                 return ERR_PTR(ret);
 403         }
 404         return root;
 405 }
 406
 407 struct btrfs_root *open_ctree(struct super_block *sb)
 408 {
 409         struct btrfs_root *extent_root = kmalloc(sizeof(struct btrfs_root),
 410                                                  GFP_NOFS);
 411         struct btrfs_root *tree_root = kmalloc(sizeof(struct btrfs_root),
 412                                                GFP_NOFS);
 413         struct btrfs_fs_info *fs_info = kmalloc(sizeof(*fs_info),
 414                                                 GFP_NOFS);
 415         int ret;
 416         int err = -EIO;
 417         struct btrfs_super_block *disk_super;
 418
 419         if (!extent_root || !tree_root || !fs_info) {
 420                 err = -ENOMEM;
 421                 goto fail;
 422         }
 423         init_bit_radix(&fs_info->pinned_radix);
 424         init_bit_radix(&fs_info->pending_del_radix);
 425         init_bit_radix(&fs_info->extent_map_radix);
 426         INIT_RADIX_TREE(&fs_info->fs_roots_radix, GFP_NOFS);
 427         INIT_RADIX_TREE(&fs_info->block_group_radix, GFP_KERNEL);
 428         INIT_RADIX_TREE(&fs_info->block_group_data_radix, GFP_KERNEL);
 429         INIT_LIST_HEAD(&fs_info->trans_list);
 430         INIT_LIST_HEAD(&fs_info->dead_roots);
 431         sb_set_blocksize(sb, 4096);
 432         fs_info->running_transaction = NULL;
 433         fs_info->tree_root = tree_root;
 434         fs_info->extent_root = extent_root;
 435         fs_info->sb = sb;
 436         fs_info->btree_inode = new_inode(sb);
 437         fs_info->btree_inode->i_ino = 1;
 438         fs_info->btree_inode->i_nlink = 1;
 439         fs_info->btree_inode->i_size = sb->s_bdev->bd_inode->i_size;
 440         fs_info->btree_inode->i_mapping->a_ops = &btree_aops;
 441         fs_info->do_barriers = 1;
 442         fs_info->extent_tree_insert_nr = 0;
 443         fs_info->extent_tree_prealloc_nr = 0;
 444         fs_info->closing = 0;
 445
 446         INIT_DELAYED_WORK(&fs_info->trans_work, btrfs_transaction_cleaner);
 447         BTRFS_I(fs_info->btree_inode)->root = tree_root;
 448         memset(&BTRFS_I(fs_info->btree_inode)->location, 0,
 449                sizeof(struct btrfs_key));
 450         insert_inode_hash(fs_info->btree_inode);
 451         mapping_set_gfp_mask(fs_info->btree_inode->i_mapping, GFP_NOFS);
 452
 453         mutex_init(&fs_info->trans_mutex);
 454         mutex_init(&fs_info->fs_mutex);
 455
 456         __setup_root(sb->s_blocksize, tree_root,
 457                      fs_info, BTRFS_ROOT_TREE_OBJECTID);
 458
 459         fs_info->sb_buffer = read_tree_block(tree_root,
 460                                              BTRFS_SUPER_INFO_OFFSET /
 461                                              sb->s_blocksize);
 462
 463         if (!fs_info->sb_buffer)
 464                 goto fail_iput;
 465         disk_super = (struct btrfs_super_block *)fs_info->sb_buffer->b_data;
 466         fs_info->disk_super = disk_super;
 467         memcpy(&fs_info->super_copy, disk_super, sizeof(fs_info->super_copy));
 468
 469         if (!btrfs_super_root(disk_super))
 470                 goto fail_sb_buffer;
 471
 472         i_size_write(fs_info->btree_inode,
 473                      btrfs_super_total_blocks(disk_super) <<
 474                      fs_info->btree_inode->i_blkbits);
 475
 476
 477         if (strncmp((char *)(&disk_super->magic), BTRFS_MAGIC,
 478                     sizeof(disk_super->magic))) {
 479                 printk("btrfs: valid FS not found on %s\n", sb->s_id);
 480                 goto fail_sb_buffer;
 481         }
 482         tree_root->node = read_tree_block(tree_root,
 483                                           btrfs_super_root(disk_super));
 484         if (!tree_root->node)
 485                 goto fail_sb_buffer;
 486
 487         mutex_lock(&fs_info->fs_mutex);
 488         ret = find_and_setup_root(sb->s_blocksize, tree_root, fs_info,
 489                                   BTRFS_EXTENT_TREE_OBJECTID, extent_root);
 490         if (ret) {
 491                 mutex_unlock(&fs_info->fs_mutex);
 492                 goto fail_tree_root;
 493         }
 494
 495         btrfs_read_block_groups(extent_root);
 496
 497         fs_info->generation = btrfs_super_generation(disk_super) + 1;
 498         ret = btrfs_find_dead_roots(tree_root);
 499         if (ret)
 500                 goto fail_tree_root;
 501         mutex_unlock(&fs_info->fs_mutex);
 502         return tree_root;
 503
 504 fail_tree_root:
 505         btrfs_block_release(tree_root, tree_root->node);
 506 fail_sb_buffer:
 507         btrfs_block_release(tree_root, fs_info->sb_buffer);
 508 fail_iput:
 509         iput(fs_info->btree_inode);
 510 fail:
 511         kfree(extent_root);
 512         kfree(tree_root);
 513         kfree(fs_info);
 514         return ERR_PTR(err);
 515 }
 516
 517 int write_ctree_super(struct btrfs_trans_handle *trans, struct btrfs_root
 518                       *root)
 519 {
 520         int ret;
 521         struct buffer_head *bh = root->fs_info->sb_buffer;
 522
 523         lock_buffer(bh);
 524         WARN_ON(atomic_read(&bh->b_count) < 1);
 525         clear_buffer_dirty(bh);
 526         csum_tree_block(root, bh, 0);
 527         bh->b_end_io = end_buffer_write_sync;
 528         get_bh(bh);
 529         if (root->fs_info->do_barriers)
 530                 ret = submit_bh(WRITE_BARRIER, bh);
 531         else
 532                 ret = submit_bh(WRITE, bh);
 533         if (ret == -EOPNOTSUPP) {
 534                 get_bh(bh);
 535                 lock_buffer(bh);
 536                 set_buffer_uptodate(bh);
 537                 root->fs_info->do_barriers = 0;
 538                 ret = submit_bh(WRITE, bh);
 539         }
 540         wait_on_buffer(bh);
 541         if (!buffer_uptodate(bh)) {
 542                 WARN_ON(1);
 543                 return -EIO;
 544         }
 545         return 0;
 546 }
 547
 548 int btrfs_free_fs_root(struct btrfs_fs_info *fs_info, struct btrfs_root *root)
 549 {
 550         radix_tree_delete(&fs_info->fs_roots_radix,
 551                           (unsigned long)root->root_key.objectid);
 552         if (root->inode)
 553                 iput(root->inode);
 554         if (root->node)
 555                 brelse(root->node);
 556         if (root->commit_root)
 557                 brelse(root->commit_root);
 558         kfree(root);
 559         return 0;
 560 }
 561
 562 static int del_fs_roots(struct btrfs_fs_info *fs_info)
 563 {
 564         int ret;
 565         struct btrfs_root *gang[8];
 566         int i;
 567
 568         while(1) {
 569                 ret = radix_tree_gang_lookup(&fs_info->fs_roots_radix,
 570                                              (void **)gang, 0,
 571                                              ARRAY_SIZE(gang));
 572                 if (!ret)
 573                         break;
 574                 for (i = 0; i < ret; i++)
 575                         btrfs_free_fs_root(fs_info, gang[i]);
 576         }
 577         return 0;
 578 }
 579
 580 int close_ctree(struct btrfs_root *root)
 581 {
 582         int ret;
 583         struct btrfs_trans_handle *trans;
 584         struct btrfs_fs_info *fs_info = root->fs_info;
 585
 586         fs_info->closing = 1;
 587         btrfs_transaction_flush_work(root);
 588         mutex_lock(&fs_info->fs_mutex);
 589         trans = btrfs_start_transaction(root, 1);
 590         ret = btrfs_commit_transaction(trans, root);
 591         /* run commit again to  drop the original snapshot */
 592         trans = btrfs_start_transaction(root, 1);
 593         btrfs_commit_transaction(trans, root);
 594         ret = btrfs_write_and_wait_transaction(NULL, root);
 595         BUG_ON(ret);
 596         write_ctree_super(NULL, root);
 597         mutex_unlock(&fs_info->fs_mutex);
 598
 599         if (fs_info->extent_root->node)
 600                 btrfs_block_release(fs_info->extent_root,
 601                                     fs_info->extent_root->node);
 602         if (fs_info->tree_root->node)
 603                 btrfs_block_release(fs_info->tree_root,
 604                                     fs_info->tree_root->node);
 605         btrfs_block_release(root, fs_info->sb_buffer);
 606         truncate_inode_pages(fs_info->btree_inode->i_mapping, 0);
 607         iput(fs_info->btree_inode);
 608
 609         btrfs_free_block_groups(root->fs_info);
 610         del_fs_roots(fs_info);
 611         kfree(fs_info->extent_root);
 612         kfree(fs_info->tree_root);
 613         return 0;
 614 }
 615
 616 void btrfs_mark_buffer_dirty(struct buffer_head *bh)
 617 {
 618         struct btrfs_root *root = BTRFS_I(bh->b_page->mapping->host)->root;
 619         u64 transid = btrfs_header_generation(btrfs_buffer_header(bh));
 620         WARN_ON(!atomic_read(&bh->b_count));
 621         if (transid != root->fs_info->generation) {
 622                 printk(KERN_CRIT "transid mismatch buffer %llu, found %Lu running %Lu\n",
 623                         (unsigned long long)bh->b_blocknr,
 624                         transid, root->fs_info->generation);
 625                 WARN_ON(1);
 626         }
 627         mark_buffer_dirty(bh);
 628 }
 629
 630 void btrfs_block_release(struct btrfs_root *root, struct buffer_head *buf)
 631 {
 632         brelse(buf);
 633 }
 634
 635 void btrfs_btree_balance_dirty(struct btrfs_root *root)
 636 {
 637         balance_dirty_pages_ratelimited(root->fs_info->btree_inode->i_mapping);
 638 }