free-space-cache.c 62.6 KB
Newer Older
J
Josef Bacik 已提交
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18
/*
 * Copyright (C) 2008 Red Hat.  All rights reserved.
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public
 * License v2 as published by the Free Software Foundation.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * General Public License for more details.
 *
 * You should have received a copy of the GNU General Public
 * License along with this program; if not, write to the
 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
 * Boston, MA 021110-1307, USA.
 */

19
#include <linux/pagemap.h>
J
Josef Bacik 已提交
20
#include <linux/sched.h>
21
#include <linux/slab.h>
22
#include <linux/math64.h>
J
Josef Bacik 已提交
23
#include "ctree.h"
24 25
#include "free-space-cache.h"
#include "transaction.h"
26
#include "disk-io.h"
27
#include "extent_io.h"
28
#include "inode-map.h"
29

30 31
#define BITS_PER_BITMAP		(PAGE_CACHE_SIZE * 8)
#define MAX_CACHE_BYTES_PER_GIG	(32 * 1024)
J
Josef Bacik 已提交
32

33
static int link_free_space(struct btrfs_free_space_ctl *ctl,
J
Josef Bacik 已提交
34 35
			   struct btrfs_free_space *info);

36 37 38
static struct inode *__lookup_free_space_inode(struct btrfs_root *root,
					       struct btrfs_path *path,
					       u64 offset)
39 40 41 42 43 44 45 46 47 48
{
	struct btrfs_key key;
	struct btrfs_key location;
	struct btrfs_disk_key disk_key;
	struct btrfs_free_space_header *header;
	struct extent_buffer *leaf;
	struct inode *inode = NULL;
	int ret;

	key.objectid = BTRFS_FREE_SPACE_OBJECTID;
49
	key.offset = offset;
50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76
	key.type = 0;

	ret = btrfs_search_slot(NULL, root, &key, path, 0, 0);
	if (ret < 0)
		return ERR_PTR(ret);
	if (ret > 0) {
		btrfs_release_path(root, path);
		return ERR_PTR(-ENOENT);
	}

	leaf = path->nodes[0];
	header = btrfs_item_ptr(leaf, path->slots[0],
				struct btrfs_free_space_header);
	btrfs_free_space_key(leaf, header, &disk_key);
	btrfs_disk_key_to_cpu(&location, &disk_key);
	btrfs_release_path(root, path);

	inode = btrfs_iget(root->fs_info->sb, &location, root, NULL);
	if (!inode)
		return ERR_PTR(-ENOENT);
	if (IS_ERR(inode))
		return inode;
	if (is_bad_inode(inode)) {
		iput(inode);
		return ERR_PTR(-ENOENT);
	}

77 78
	inode->i_mapping->flags &= ~__GFP_FS;

79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99
	return inode;
}

struct inode *lookup_free_space_inode(struct btrfs_root *root,
				      struct btrfs_block_group_cache
				      *block_group, struct btrfs_path *path)
{
	struct inode *inode = NULL;

	spin_lock(&block_group->lock);
	if (block_group->inode)
		inode = igrab(block_group->inode);
	spin_unlock(&block_group->lock);
	if (inode)
		return inode;

	inode = __lookup_free_space_inode(root, path,
					  block_group->key.objectid);
	if (IS_ERR(inode))
		return inode;

100 101 102 103 104 105 106 107 108 109
	spin_lock(&block_group->lock);
	if (!root->fs_info->closing) {
		block_group->inode = igrab(inode);
		block_group->iref = 1;
	}
	spin_unlock(&block_group->lock);

	return inode;
}

110 111 112
int __create_free_space_inode(struct btrfs_root *root,
			      struct btrfs_trans_handle *trans,
			      struct btrfs_path *path, u64 ino, u64 offset)
113 114 115 116 117 118 119 120
{
	struct btrfs_key key;
	struct btrfs_disk_key disk_key;
	struct btrfs_free_space_header *header;
	struct btrfs_inode_item *inode_item;
	struct extent_buffer *leaf;
	int ret;

121
	ret = btrfs_insert_empty_inode(trans, root, path, ino);
122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140
	if (ret)
		return ret;

	leaf = path->nodes[0];
	inode_item = btrfs_item_ptr(leaf, path->slots[0],
				    struct btrfs_inode_item);
	btrfs_item_key(leaf, &disk_key, path->slots[0]);
	memset_extent_buffer(leaf, 0, (unsigned long)inode_item,
			     sizeof(*inode_item));
	btrfs_set_inode_generation(leaf, inode_item, trans->transid);
	btrfs_set_inode_size(leaf, inode_item, 0);
	btrfs_set_inode_nbytes(leaf, inode_item, 0);
	btrfs_set_inode_uid(leaf, inode_item, 0);
	btrfs_set_inode_gid(leaf, inode_item, 0);
	btrfs_set_inode_mode(leaf, inode_item, S_IFREG | 0600);
	btrfs_set_inode_flags(leaf, inode_item, BTRFS_INODE_NOCOMPRESS |
			      BTRFS_INODE_PREALLOC | BTRFS_INODE_NODATASUM);
	btrfs_set_inode_nlink(leaf, inode_item, 1);
	btrfs_set_inode_transid(leaf, inode_item, trans->transid);
141
	btrfs_set_inode_block_group(leaf, inode_item, offset);
142 143 144 145
	btrfs_mark_buffer_dirty(leaf);
	btrfs_release_path(root, path);

	key.objectid = BTRFS_FREE_SPACE_OBJECTID;
146
	key.offset = offset;
147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165
	key.type = 0;

	ret = btrfs_insert_empty_item(trans, root, path, &key,
				      sizeof(struct btrfs_free_space_header));
	if (ret < 0) {
		btrfs_release_path(root, path);
		return ret;
	}
	leaf = path->nodes[0];
	header = btrfs_item_ptr(leaf, path->slots[0],
				struct btrfs_free_space_header);
	memset_extent_buffer(leaf, 0, (unsigned long)header, sizeof(*header));
	btrfs_set_free_space_key(leaf, header, &disk_key);
	btrfs_mark_buffer_dirty(leaf);
	btrfs_release_path(root, path);

	return 0;
}

166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181
int create_free_space_inode(struct btrfs_root *root,
			    struct btrfs_trans_handle *trans,
			    struct btrfs_block_group_cache *block_group,
			    struct btrfs_path *path)
{
	int ret;
	u64 ino;

	ret = btrfs_find_free_objectid(root, &ino);
	if (ret < 0)
		return ret;

	return __create_free_space_inode(root, trans, path, ino,
					 block_group->key.objectid);
}

182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211
int btrfs_truncate_free_space_cache(struct btrfs_root *root,
				    struct btrfs_trans_handle *trans,
				    struct btrfs_path *path,
				    struct inode *inode)
{
	loff_t oldsize;
	int ret = 0;

	trans->block_rsv = root->orphan_block_rsv;
	ret = btrfs_block_rsv_check(trans, root,
				    root->orphan_block_rsv,
				    0, 5);
	if (ret)
		return ret;

	oldsize = i_size_read(inode);
	btrfs_i_size_write(inode, 0);
	truncate_pagecache(inode, oldsize, 0);

	/*
	 * We don't need an orphan item because truncating the free space cache
	 * will never be split across transactions.
	 */
	ret = btrfs_truncate_inode_items(trans, root, inode,
					 0, BTRFS_EXTENT_DATA_KEY);
	if (ret) {
		WARN_ON(1);
		return ret;
	}

212 213
	ret = btrfs_update_inode(trans, root, inode);
	return ret;
214 215
}

216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234
static int readahead_cache(struct inode *inode)
{
	struct file_ra_state *ra;
	unsigned long last_index;

	ra = kzalloc(sizeof(*ra), GFP_NOFS);
	if (!ra)
		return -ENOMEM;

	file_ra_state_init(ra, inode->i_mapping);
	last_index = (i_size_read(inode) - 1) >> PAGE_CACHE_SHIFT;

	page_cache_sync_readahead(inode->i_mapping, ra, NULL, 0, last_index);

	kfree(ra);

	return 0;
}

235 236 237
int __load_free_space_cache(struct btrfs_root *root, struct inode *inode,
			    struct btrfs_free_space_ctl *ctl,
			    struct btrfs_path *path, u64 offset)
238 239 240 241 242 243 244 245 246 247 248 249 250 251 252
{
	struct btrfs_free_space_header *header;
	struct extent_buffer *leaf;
	struct page *page;
	u32 *checksums = NULL, *crc;
	char *disk_crcs = NULL;
	struct btrfs_key key;
	struct list_head bitmaps;
	u64 num_entries;
	u64 num_bitmaps;
	u64 generation;
	u32 cur_crc = ~(u32)0;
	pgoff_t index = 0;
	unsigned long first_page_offset;
	int num_checksums;
253
	int ret = 0, ret2;
254 255 256 257

	INIT_LIST_HEAD(&bitmaps);

	/* Nothing in the space cache, goodbye */
258
	if (!i_size_read(inode))
259 260 261
		goto out;

	key.objectid = BTRFS_FREE_SPACE_OBJECTID;
262
	key.offset = offset;
263 264 265
	key.type = 0;

	ret = btrfs_search_slot(NULL, root, &key, path, 0, 0);
266 267 268 269 270
	if (ret < 0)
		goto out;
	else if (ret > 0) {
		btrfs_release_path(root, path);
		ret = 0;
271 272 273
		goto out;
	}

274 275
	ret = -1;

276 277 278 279 280 281
	leaf = path->nodes[0];
	header = btrfs_item_ptr(leaf, path->slots[0],
				struct btrfs_free_space_header);
	num_entries = btrfs_free_space_entries(leaf, header);
	num_bitmaps = btrfs_free_space_bitmaps(leaf, header);
	generation = btrfs_free_space_generation(leaf, header);
282
	btrfs_release_path(root, path);
283 284 285

	if (BTRFS_I(inode)->generation != generation) {
		printk(KERN_ERR "btrfs: free space inode generation (%llu) did"
286
		       " not match free space cache generation (%llu)\n",
287
		       (unsigned long long)BTRFS_I(inode)->generation,
288 289
		       (unsigned long long)generation);
		goto out;
290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305
	}

	if (!num_entries)
		goto out;

	/* Setup everything for doing checksumming */
	num_checksums = i_size_read(inode) / PAGE_CACHE_SIZE;
	checksums = crc = kzalloc(sizeof(u32) * num_checksums, GFP_NOFS);
	if (!checksums)
		goto out;
	first_page_offset = (sizeof(u32) * num_checksums) + sizeof(u64);
	disk_crcs = kzalloc(first_page_offset, GFP_NOFS);
	if (!disk_crcs)
		goto out;

	ret = readahead_cache(inode);
306
	if (ret)
307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325
		goto out;

	while (1) {
		struct btrfs_free_space_entry *entry;
		struct btrfs_free_space *e;
		void *addr;
		unsigned long offset = 0;
		unsigned long start_offset = 0;
		int need_loop = 0;

		if (!num_entries && !num_bitmaps)
			break;

		if (index == 0) {
			start_offset = first_page_offset;
			offset = start_offset;
		}

		page = grab_cache_page(inode->i_mapping, index);
326
		if (!page)
327 328 329 330 331 332 333 334 335
			goto free_cache;

		if (!PageUptodate(page)) {
			btrfs_readpage(NULL, page);
			lock_page(page);
			if (!PageUptodate(page)) {
				unlock_page(page);
				page_cache_release(page);
				printk(KERN_ERR "btrfs: error reading free "
336
				       "space cache\n");
337 338 339 340 341 342 343 344 345 346 347 348
				goto free_cache;
			}
		}
		addr = kmap(page);

		if (index == 0) {
			u64 *gen;

			memcpy(disk_crcs, addr, first_page_offset);
			gen = addr + (sizeof(u32) * num_checksums);
			if (*gen != BTRFS_I(inode)->generation) {
				printk(KERN_ERR "btrfs: space cache generation"
349
				       " (%llu) does not match inode (%llu)\n",
350 351
				       (unsigned long long)*gen,
				       (unsigned long long)
352
				       BTRFS_I(inode)->generation);
353 354 355 356 357 358 359 360 361 362 363 364 365 366 367
				kunmap(page);
				unlock_page(page);
				page_cache_release(page);
				goto free_cache;
			}
			crc = (u32 *)disk_crcs;
		}
		entry = addr + start_offset;

		/* First lets check our crc before we do anything fun */
		cur_crc = ~(u32)0;
		cur_crc = btrfs_csum_data(root, addr + start_offset, cur_crc,
					  PAGE_CACHE_SIZE - start_offset);
		btrfs_csum_final(cur_crc, (char *)&cur_crc);
		if (cur_crc != *crc) {
368 369
			printk(KERN_ERR "btrfs: crc mismatch for page %lu\n",
			       index);
370 371 372 373 374 375 376 377 378 379 380 381
			kunmap(page);
			unlock_page(page);
			page_cache_release(page);
			goto free_cache;
		}
		crc++;

		while (1) {
			if (!num_entries)
				break;

			need_loop = 1;
382 383
			e = kmem_cache_zalloc(btrfs_free_space_cachep,
					      GFP_NOFS);
384 385 386 387 388 389 390 391 392 393 394
			if (!e) {
				kunmap(page);
				unlock_page(page);
				page_cache_release(page);
				goto free_cache;
			}

			e->offset = le64_to_cpu(entry->offset);
			e->bytes = le64_to_cpu(entry->bytes);
			if (!e->bytes) {
				kunmap(page);
395
				kmem_cache_free(btrfs_free_space_cachep, e);
396 397 398 399 400 401
				unlock_page(page);
				page_cache_release(page);
				goto free_cache;
			}

			if (entry->type == BTRFS_FREE_SPACE_EXTENT) {
402 403 404
				spin_lock(&ctl->tree_lock);
				ret = link_free_space(ctl, e);
				spin_unlock(&ctl->tree_lock);
405 406 407 408 409
				BUG_ON(ret);
			} else {
				e->bitmap = kzalloc(PAGE_CACHE_SIZE, GFP_NOFS);
				if (!e->bitmap) {
					kunmap(page);
410 411
					kmem_cache_free(
						btrfs_free_space_cachep, e);
412 413 414 415
					unlock_page(page);
					page_cache_release(page);
					goto free_cache;
				}
416
				spin_lock(&ctl->tree_lock);
417
				ret2 = link_free_space(ctl, e);
418 419 420
				ctl->total_bitmaps++;
				ctl->op->recalc_thresholds(ctl);
				spin_unlock(&ctl->tree_lock);
421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447 448 449 450 451 452 453 454 455 456 457 458 459 460 461
				list_add_tail(&e->list, &bitmaps);
			}

			num_entries--;
			offset += sizeof(struct btrfs_free_space_entry);
			if (offset + sizeof(struct btrfs_free_space_entry) >=
			    PAGE_CACHE_SIZE)
				break;
			entry++;
		}

		/*
		 * We read an entry out of this page, we need to move on to the
		 * next page.
		 */
		if (need_loop) {
			kunmap(page);
			goto next;
		}

		/*
		 * We add the bitmaps at the end of the entries in order that
		 * the bitmap entries are added to the cache.
		 */
		e = list_entry(bitmaps.next, struct btrfs_free_space, list);
		list_del_init(&e->list);
		memcpy(e->bitmap, addr, PAGE_CACHE_SIZE);
		kunmap(page);
		num_bitmaps--;
next:
		unlock_page(page);
		page_cache_release(page);
		index++;
	}

	ret = 1;
out:
	kfree(checksums);
	kfree(disk_crcs);
	return ret;
free_cache:
462
	__btrfs_remove_free_space_cache(ctl);
463 464 465
	goto out;
}

466 467
int load_free_space_cache(struct btrfs_fs_info *fs_info,
			  struct btrfs_block_group_cache *block_group)
J
Josef Bacik 已提交
468
{
469
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
470 471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528
	struct btrfs_root *root = fs_info->tree_root;
	struct inode *inode;
	struct btrfs_path *path;
	int ret;
	bool matched;
	u64 used = btrfs_block_group_used(&block_group->item);

	/*
	 * If we're unmounting then just return, since this does a search on the
	 * normal root and not the commit root and we could deadlock.
	 */
	smp_mb();
	if (fs_info->closing)
		return 0;

	/*
	 * If this block group has been marked to be cleared for one reason or
	 * another then we can't trust the on disk cache, so just return.
	 */
	spin_lock(&block_group->lock);
	if (block_group->disk_cache_state != BTRFS_DC_WRITTEN) {
		spin_unlock(&block_group->lock);
		return 0;
	}
	spin_unlock(&block_group->lock);

	path = btrfs_alloc_path();
	if (!path)
		return 0;

	inode = lookup_free_space_inode(root, block_group, path);
	if (IS_ERR(inode)) {
		btrfs_free_path(path);
		return 0;
	}

	ret = __load_free_space_cache(fs_info->tree_root, inode, ctl,
				      path, block_group->key.objectid);
	btrfs_free_path(path);
	if (ret <= 0)
		goto out;

	spin_lock(&ctl->tree_lock);
	matched = (ctl->free_space == (block_group->key.offset - used -
				       block_group->bytes_super));
	spin_unlock(&ctl->tree_lock);

	if (!matched) {
		__btrfs_remove_free_space_cache(ctl);
		printk(KERN_ERR "block group %llu has an wrong amount of free "
		       "space\n", block_group->key.objectid);
		ret = -1;
	}
out:
	if (ret < 0) {
		/* This cache is bogus, make sure it gets cleared */
		spin_lock(&block_group->lock);
		block_group->disk_cache_state = BTRFS_DC_CLEAR;
		spin_unlock(&block_group->lock);
529
		ret = 0;
530 531 532 533 534 535 536 537 538 539 540 541 542 543 544

		printk(KERN_ERR "btrfs: failed to load free space cache "
		       "for block group %llu\n", block_group->key.objectid);
	}

	iput(inode);
	return ret;
}

int __btrfs_write_out_cache(struct btrfs_root *root, struct inode *inode,
			    struct btrfs_free_space_ctl *ctl,
			    struct btrfs_block_group_cache *block_group,
			    struct btrfs_trans_handle *trans,
			    struct btrfs_path *path, u64 offset)
{
J
Josef Bacik 已提交
545 546 547 548
	struct btrfs_free_space_header *header;
	struct extent_buffer *leaf;
	struct rb_node *node;
	struct list_head *pos, *n;
549
	struct page **pages;
J
Josef Bacik 已提交
550 551
	struct page *page;
	struct extent_state *cached_state = NULL;
552 553
	struct btrfs_free_cluster *cluster = NULL;
	struct extent_io_tree *unpin = NULL;
J
Josef Bacik 已提交
554 555
	struct list_head bitmap_list;
	struct btrfs_key key;
556
	u64 start, end, len;
J
Josef Bacik 已提交
557 558 559
	u64 bytes = 0;
	u32 *crc, *checksums;
	unsigned long first_page_offset;
560
	int index = 0, num_pages = 0;
J
Josef Bacik 已提交
561 562
	int entries = 0;
	int bitmaps = 0;
563
	int ret = -1;
564
	bool next_page = false;
565
	bool out_of_space = false;
J
Josef Bacik 已提交
566 567 568

	INIT_LIST_HEAD(&bitmap_list);

569
	node = rb_first(&ctl->free_space_offset);
570
	if (!node)
571
		return 0;
572 573 574

	if (!i_size_read(inode))
		return -1;
575

576 577
	num_pages = (i_size_read(inode) + PAGE_CACHE_SIZE - 1) >>
		PAGE_CACHE_SHIFT;
J
Josef Bacik 已提交
578 579 580 581 582
	filemap_write_and_wait(inode->i_mapping);
	btrfs_wait_ordered_range(inode, inode->i_size &
				 ~(root->sectorsize - 1), (u64)-1);

	/* We need a checksum per page. */
583
	crc = checksums = kzalloc(sizeof(u32) * num_pages, GFP_NOFS);
584 585
	if (!crc)
		return -1;
J
Josef Bacik 已提交
586

587 588 589
	pages = kzalloc(sizeof(struct page *) * num_pages, GFP_NOFS);
	if (!pages) {
		kfree(crc);
590
		return -1;
591 592
	}

J
Josef Bacik 已提交
593 594 595 596
	/* Since the first page has all of our checksums and our generation we
	 * need to calculate the offset into the page that we can start writing
	 * our entries.
	 */
597
	first_page_offset = (sizeof(u32) * num_pages) + sizeof(u64);
J
Josef Bacik 已提交
598

599
	/* Get the cluster for this block_group if it exists */
600
	if (block_group && !list_empty(&block_group->cluster_list))
601 602 603 604 605 606 607 608 609 610
		cluster = list_entry(block_group->cluster_list.next,
				     struct btrfs_free_cluster,
				     block_group_list);

	/*
	 * We shouldn't have switched the pinned extents yet so this is the
	 * right one
	 */
	unpin = root->fs_info->pinned_extents;

J
Josef Bacik 已提交
611 612 613 614 615 616 617 618
	/*
	 * Lock all pages first so we can lock the extent safely.
	 *
	 * NOTE: Because we hold the ref the entire time we're going to write to
	 * the page find_get_page should never fail, so we don't do a check
	 * after find_get_page at this point.  Just putting this here so people
	 * know and don't freak out.
	 */
619
	while (index < num_pages) {
J
Josef Bacik 已提交
620 621
		page = grab_cache_page(inode->i_mapping, index);
		if (!page) {
622
			int i;
J
Josef Bacik 已提交
623

624 625 626
			for (i = 0; i < num_pages; i++) {
				unlock_page(pages[i]);
				page_cache_release(pages[i]);
J
Josef Bacik 已提交
627 628 629
			}
			goto out_free;
		}
630
		pages[index] = page;
J
Josef Bacik 已提交
631 632 633 634 635 636 637
		index++;
	}

	index = 0;
	lock_extent_bits(&BTRFS_I(inode)->io_tree, 0, i_size_read(inode) - 1,
			 0, &cached_state, GFP_NOFS);

638 639 640 641
	/*
	 * When searching for pinned extents, we need to start at our start
	 * offset.
	 */
642 643
	if (block_group)
		start = block_group->key.objectid;
644

J
Josef Bacik 已提交
645 646 647 648 649 650 651
	/* Write out the extent entries */
	do {
		struct btrfs_free_space_entry *entry;
		void *addr;
		unsigned long offset = 0;
		unsigned long start_offset = 0;

652 653
		next_page = false;

J
Josef Bacik 已提交
654 655 656 657 658
		if (index == 0) {
			start_offset = first_page_offset;
			offset = start_offset;
		}

659 660 661 662 663 664
		if (index >= num_pages) {
			out_of_space = true;
			break;
		}

		page = pages[index];
J
Josef Bacik 已提交
665 666 667 668 669

		addr = kmap(page);
		entry = addr + start_offset;

		memset(addr, 0, PAGE_CACHE_SIZE);
670
		while (node && !next_page) {
J
Josef Bacik 已提交
671 672 673 674 675 676 677 678 679 680 681 682 683 684 685
			struct btrfs_free_space *e;

			e = rb_entry(node, struct btrfs_free_space, offset_index);
			entries++;

			entry->offset = cpu_to_le64(e->offset);
			entry->bytes = cpu_to_le64(e->bytes);
			if (e->bitmap) {
				entry->type = BTRFS_FREE_SPACE_BITMAP;
				list_add_tail(&e->list, &bitmap_list);
				bitmaps++;
			} else {
				entry->type = BTRFS_FREE_SPACE_EXTENT;
			}
			node = rb_next(node);
686 687 688 689
			if (!node && cluster) {
				node = rb_first(&cluster->root);
				cluster = NULL;
			}
J
Josef Bacik 已提交
690 691 692
			offset += sizeof(struct btrfs_free_space_entry);
			if (offset + sizeof(struct btrfs_free_space_entry) >=
			    PAGE_CACHE_SIZE)
693 694 695 696 697 698 699 700
				next_page = true;
			entry++;
		}

		/*
		 * We want to add any pinned extents to our free space cache
		 * so we don't leak the space
		 */
701 702 703
		while (block_group && !next_page &&
		       (start < block_group->key.objectid +
			block_group->key.offset)) {
704 705 706 707 708 709 710 711 712 713
			ret = find_first_extent_bit(unpin, start, &start, &end,
						    EXTENT_DIRTY);
			if (ret) {
				ret = 0;
				break;
			}

			/* This pinned extent is out of our range */
			if (start >= block_group->key.objectid +
			    block_group->key.offset)
J
Josef Bacik 已提交
714
				break;
715 716 717 718 719 720 721 722 723 724 725 726 727 728 729

			len = block_group->key.objectid +
				block_group->key.offset - start;
			len = min(len, end + 1 - start);

			entries++;
			entry->offset = cpu_to_le64(start);
			entry->bytes = cpu_to_le64(len);
			entry->type = BTRFS_FREE_SPACE_EXTENT;

			start = end + 1;
			offset += sizeof(struct btrfs_free_space_entry);
			if (offset + sizeof(struct btrfs_free_space_entry) >=
			    PAGE_CACHE_SIZE)
				next_page = true;
J
Josef Bacik 已提交
730 731 732 733 734 735 736 737 738 739 740 741 742
			entry++;
		}
		*crc = ~(u32)0;
		*crc = btrfs_csum_data(root, addr + start_offset, *crc,
				       PAGE_CACHE_SIZE - start_offset);
		kunmap(page);

		btrfs_csum_final(*crc, (char *)crc);
		crc++;

		bytes += PAGE_CACHE_SIZE;

		index++;
743
	} while (node || next_page);
J
Josef Bacik 已提交
744 745 746 747 748 749 750

	/* Write out the bitmaps */
	list_for_each_safe(pos, n, &bitmap_list) {
		void *addr;
		struct btrfs_free_space *entry =
			list_entry(pos, struct btrfs_free_space, list);

751 752 753 754
		if (index >= num_pages) {
			out_of_space = true;
			break;
		}
C
Chris Mason 已提交
755
		page = pages[index];
J
Josef Bacik 已提交
756 757 758 759 760 761 762 763 764 765 766 767 768 769

		addr = kmap(page);
		memcpy(addr, entry->bitmap, PAGE_CACHE_SIZE);
		*crc = ~(u32)0;
		*crc = btrfs_csum_data(root, addr, *crc, PAGE_CACHE_SIZE);
		kunmap(page);
		btrfs_csum_final(*crc, (char *)crc);
		crc++;
		bytes += PAGE_CACHE_SIZE;

		list_del_init(&entry->list);
		index++;
	}

770 771 772 773 774 775 776 777 778
	if (out_of_space) {
		btrfs_drop_pages(pages, num_pages);
		unlock_extent_cached(&BTRFS_I(inode)->io_tree, 0,
				     i_size_read(inode) - 1, &cached_state,
				     GFP_NOFS);
		ret = 0;
		goto out_free;
	}

J
Josef Bacik 已提交
779
	/* Zero out the rest of the pages just to make sure */
780
	while (index < num_pages) {
J
Josef Bacik 已提交
781 782
		void *addr;

783
		page = pages[index];
J
Josef Bacik 已提交
784 785 786 787 788 789 790 791 792 793 794 795
		addr = kmap(page);
		memset(addr, 0, PAGE_CACHE_SIZE);
		kunmap(page);
		bytes += PAGE_CACHE_SIZE;
		index++;
	}

	/* Write the checksums and trans id to the first page */
	{
		void *addr;
		u64 *gen;

796
		page = pages[0];
J
Josef Bacik 已提交
797 798

		addr = kmap(page);
799 800
		memcpy(addr, checksums, sizeof(u32) * num_pages);
		gen = addr + (sizeof(u32) * num_pages);
J
Josef Bacik 已提交
801 802 803 804
		*gen = trans->transid;
		kunmap(page);
	}

805 806 807
	ret = btrfs_dirty_pages(root, inode, pages, num_pages, 0,
					    bytes, &cached_state);
	btrfs_drop_pages(pages, num_pages);
J
Josef Bacik 已提交
808 809 810
	unlock_extent_cached(&BTRFS_I(inode)->io_tree, 0,
			     i_size_read(inode) - 1, &cached_state, GFP_NOFS);

811 812 813 814 815 816 817
	if (ret) {
		ret = 0;
		goto out_free;
	}

	BTRFS_I(inode)->generation = trans->transid;

J
Josef Bacik 已提交
818 819 820
	filemap_write_and_wait(inode->i_mapping);

	key.objectid = BTRFS_FREE_SPACE_OBJECTID;
821
	key.offset = offset;
J
Josef Bacik 已提交
822 823 824 825
	key.type = 0;

	ret = btrfs_search_slot(trans, root, &key, path, 1, 1);
	if (ret < 0) {
826
		ret = -1;
J
Josef Bacik 已提交
827 828 829 830 831 832 833 834 835 836 837 838
		clear_extent_bit(&BTRFS_I(inode)->io_tree, 0, bytes - 1,
				 EXTENT_DIRTY | EXTENT_DELALLOC |
				 EXTENT_DO_ACCOUNTING, 0, 0, NULL, GFP_NOFS);
		goto out_free;
	}
	leaf = path->nodes[0];
	if (ret > 0) {
		struct btrfs_key found_key;
		BUG_ON(!path->slots[0]);
		path->slots[0]--;
		btrfs_item_key_to_cpu(leaf, &found_key, path->slots[0]);
		if (found_key.objectid != BTRFS_FREE_SPACE_OBJECTID ||
839 840
		    found_key.offset != offset) {
			ret = -1;
J
Josef Bacik 已提交
841 842 843 844 845 846 847 848 849 850 851 852 853 854 855 856 857 858 859
			clear_extent_bit(&BTRFS_I(inode)->io_tree, 0, bytes - 1,
					 EXTENT_DIRTY | EXTENT_DELALLOC |
					 EXTENT_DO_ACCOUNTING, 0, 0, NULL,
					 GFP_NOFS);
			btrfs_release_path(root, path);
			goto out_free;
		}
	}
	header = btrfs_item_ptr(leaf, path->slots[0],
				struct btrfs_free_space_header);
	btrfs_set_free_space_entries(leaf, header, entries);
	btrfs_set_free_space_bitmaps(leaf, header, bitmaps);
	btrfs_set_free_space_generation(leaf, header, trans->transid);
	btrfs_mark_buffer_dirty(leaf);
	btrfs_release_path(root, path);

	ret = 1;

out_free:
860
	if (ret != 1) {
J
Josef Bacik 已提交
861 862 863 864
		invalidate_inode_pages2_range(inode->i_mapping, 0, index);
		BTRFS_I(inode)->generation = 0;
	}
	kfree(checksums);
865
	kfree(pages);
J
Josef Bacik 已提交
866
	btrfs_update_inode(trans, root, inode);
867 868 869 870 871 872 873 874 875 876 877 878 879 880 881 882 883 884 885 886 887 888 889 890 891 892 893 894 895 896 897
	return ret;
}

int btrfs_write_out_cache(struct btrfs_root *root,
			  struct btrfs_trans_handle *trans,
			  struct btrfs_block_group_cache *block_group,
			  struct btrfs_path *path)
{
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
	struct inode *inode;
	int ret = 0;

	root = root->fs_info->tree_root;

	spin_lock(&block_group->lock);
	if (block_group->disk_cache_state < BTRFS_DC_SETUP) {
		spin_unlock(&block_group->lock);
		return 0;
	}
	spin_unlock(&block_group->lock);

	inode = lookup_free_space_inode(root, block_group, path);
	if (IS_ERR(inode))
		return 0;

	ret = __btrfs_write_out_cache(root, inode, ctl, block_group, trans,
				      path, block_group->key.objectid);
	if (ret < 0) {
		spin_lock(&block_group->lock);
		block_group->disk_cache_state = BTRFS_DC_ERROR;
		spin_unlock(&block_group->lock);
898
		ret = 0;
899 900 901 902 903

		printk(KERN_ERR "btrfs: failed to write free space cace "
		       "for block group %llu\n", block_group->key.objectid);
	}

J
Josef Bacik 已提交
904 905 906 907
	iput(inode);
	return ret;
}

908
static inline unsigned long offset_to_bit(u64 bitmap_start, u32 unit,
909
					  u64 offset)
J
Josef Bacik 已提交
910
{
911 912
	BUG_ON(offset < bitmap_start);
	offset -= bitmap_start;
913
	return (unsigned long)(div_u64(offset, unit));
914
}
J
Josef Bacik 已提交
915

916
static inline unsigned long bytes_to_bits(u64 bytes, u32 unit)
917
{
918
	return (unsigned long)(div_u64(bytes, unit));
919
}
J
Josef Bacik 已提交
920

921
static inline u64 offset_to_bitmap(struct btrfs_free_space_ctl *ctl,
922 923 924 925
				   u64 offset)
{
	u64 bitmap_start;
	u64 bytes_per_bitmap;
J
Josef Bacik 已提交
926

927 928
	bytes_per_bitmap = BITS_PER_BITMAP * ctl->unit;
	bitmap_start = offset - ctl->start;
929 930
	bitmap_start = div64_u64(bitmap_start, bytes_per_bitmap);
	bitmap_start *= bytes_per_bitmap;
931
	bitmap_start += ctl->start;
J
Josef Bacik 已提交
932

933
	return bitmap_start;
J
Josef Bacik 已提交
934 935
}

936 937
static int tree_insert_offset(struct rb_root *root, u64 offset,
			      struct rb_node *node, int bitmap)
J
Josef Bacik 已提交
938 939 940 941 942 943 944
{
	struct rb_node **p = &root->rb_node;
	struct rb_node *parent = NULL;
	struct btrfs_free_space *info;

	while (*p) {
		parent = *p;
945
		info = rb_entry(parent, struct btrfs_free_space, offset_index);
J
Josef Bacik 已提交
946

947
		if (offset < info->offset) {
J
Josef Bacik 已提交
948
			p = &(*p)->rb_left;
949
		} else if (offset > info->offset) {
J
Josef Bacik 已提交
950
			p = &(*p)->rb_right;
951 952 953 954 955 956 957 958 959 960 961 962 963 964 965 966 967 968 969 970 971 972
		} else {
			/*
			 * we could have a bitmap entry and an extent entry
			 * share the same offset.  If this is the case, we want
			 * the extent entry to always be found first if we do a
			 * linear search through the tree, since we want to have
			 * the quickest allocation time, and allocating from an
			 * extent is faster than allocating from a bitmap.  So
			 * if we're inserting a bitmap and we find an entry at
			 * this offset, we want to go right, or after this entry
			 * logically.  If we are inserting an extent and we've
			 * found a bitmap, we want to go left, or before
			 * logically.
			 */
			if (bitmap) {
				WARN_ON(info->bitmap);
				p = &(*p)->rb_right;
			} else {
				WARN_ON(!info->bitmap);
				p = &(*p)->rb_left;
			}
		}
J
Josef Bacik 已提交
973 974 975 976 977 978 979 980 981
	}

	rb_link_node(node, parent, p);
	rb_insert_color(node, root);

	return 0;
}

/*
J
Josef Bacik 已提交
982 983
 * searches the tree for the given offset.
 *
984 985 986
 * fuzzy - If this is set, then we are trying to make an allocation, and we just
 * want a section that has at least bytes size and comes at or after the given
 * offset.
J
Josef Bacik 已提交
987
 */
988
static struct btrfs_free_space *
989
tree_search_offset(struct btrfs_free_space_ctl *ctl,
990
		   u64 offset, int bitmap_only, int fuzzy)
J
Josef Bacik 已提交
991
{
992
	struct rb_node *n = ctl->free_space_offset.rb_node;
993 994 995 996 997 998 999 1000
	struct btrfs_free_space *entry, *prev = NULL;

	/* find entry that is closest to the 'offset' */
	while (1) {
		if (!n) {
			entry = NULL;
			break;
		}
J
Josef Bacik 已提交
1001 1002

		entry = rb_entry(n, struct btrfs_free_space, offset_index);
1003
		prev = entry;
J
Josef Bacik 已提交
1004

1005
		if (offset < entry->offset)
J
Josef Bacik 已提交
1006
			n = n->rb_left;
1007
		else if (offset > entry->offset)
J
Josef Bacik 已提交
1008
			n = n->rb_right;
1009
		else
J
Josef Bacik 已提交
1010 1011 1012
			break;
	}

1013 1014 1015 1016 1017
	if (bitmap_only) {
		if (!entry)
			return NULL;
		if (entry->bitmap)
			return entry;
J
Josef Bacik 已提交
1018

1019 1020 1021 1022 1023 1024 1025 1026 1027 1028
		/*
		 * bitmap entry and extent entry may share same offset,
		 * in that case, bitmap entry comes after extent entry.
		 */
		n = rb_next(n);
		if (!n)
			return NULL;
		entry = rb_entry(n, struct btrfs_free_space, offset_index);
		if (entry->offset != offset)
			return NULL;
J
Josef Bacik 已提交
1029

1030 1031 1032 1033
		WARN_ON(!entry->bitmap);
		return entry;
	} else if (entry) {
		if (entry->bitmap) {
J
Josef Bacik 已提交
1034
			/*
1035 1036
			 * if previous extent entry covers the offset,
			 * we should return it instead of the bitmap entry
J
Josef Bacik 已提交
1037
			 */
1038 1039 1040 1041 1042 1043 1044 1045 1046 1047 1048 1049
			n = &entry->offset_index;
			while (1) {
				n = rb_prev(n);
				if (!n)
					break;
				prev = rb_entry(n, struct btrfs_free_space,
						offset_index);
				if (!prev->bitmap) {
					if (prev->offset + prev->bytes > offset)
						entry = prev;
					break;
				}
J
Josef Bacik 已提交
1050
			}
1051 1052 1053 1054 1055 1056 1057 1058 1059 1060 1061 1062 1063 1064 1065
		}
		return entry;
	}

	if (!prev)
		return NULL;

	/* find last entry before the 'offset' */
	entry = prev;
	if (entry->offset > offset) {
		n = rb_prev(&entry->offset_index);
		if (n) {
			entry = rb_entry(n, struct btrfs_free_space,
					offset_index);
			BUG_ON(entry->offset > offset);
J
Josef Bacik 已提交
1066
		} else {
1067 1068 1069 1070
			if (fuzzy)
				return entry;
			else
				return NULL;
J
Josef Bacik 已提交
1071 1072 1073
		}
	}

1074 1075 1076 1077 1078 1079 1080 1081 1082 1083 1084 1085 1086 1087
	if (entry->bitmap) {
		n = &entry->offset_index;
		while (1) {
			n = rb_prev(n);
			if (!n)
				break;
			prev = rb_entry(n, struct btrfs_free_space,
					offset_index);
			if (!prev->bitmap) {
				if (prev->offset + prev->bytes > offset)
					return prev;
				break;
			}
		}
1088
		if (entry->offset + BITS_PER_BITMAP * ctl->unit > offset)
1089 1090 1091 1092 1093 1094 1095 1096 1097 1098
			return entry;
	} else if (entry->offset + entry->bytes > offset)
		return entry;

	if (!fuzzy)
		return NULL;

	while (1) {
		if (entry->bitmap) {
			if (entry->offset + BITS_PER_BITMAP *
1099
			    ctl->unit > offset)
1100 1101 1102 1103 1104 1105 1106 1107 1108 1109 1110 1111
				break;
		} else {
			if (entry->offset + entry->bytes > offset)
				break;
		}

		n = rb_next(&entry->offset_index);
		if (!n)
			return NULL;
		entry = rb_entry(n, struct btrfs_free_space, offset_index);
	}
	return entry;
J
Josef Bacik 已提交
1112 1113
}

1114
static inline void
1115
__unlink_free_space(struct btrfs_free_space_ctl *ctl,
1116
		    struct btrfs_free_space *info)
J
Josef Bacik 已提交
1117
{
1118 1119
	rb_erase(&info->offset_index, &ctl->free_space_offset);
	ctl->free_extents--;
1120 1121
}

1122
static void unlink_free_space(struct btrfs_free_space_ctl *ctl,
1123 1124
			      struct btrfs_free_space *info)
{
1125 1126
	__unlink_free_space(ctl, info);
	ctl->free_space -= info->bytes;
J
Josef Bacik 已提交
1127 1128
}

1129
static int link_free_space(struct btrfs_free_space_ctl *ctl,
J
Josef Bacik 已提交
1130 1131 1132 1133
			   struct btrfs_free_space *info)
{
	int ret = 0;

1134
	BUG_ON(!info->bitmap && !info->bytes);
1135
	ret = tree_insert_offset(&ctl->free_space_offset, info->offset,
1136
				 &info->offset_index, (info->bitmap != NULL));
J
Josef Bacik 已提交
1137 1138 1139
	if (ret)
		return ret;

1140 1141
	ctl->free_space += info->bytes;
	ctl->free_extents++;
1142 1143 1144
	return ret;
}

1145
static void recalculate_thresholds(struct btrfs_free_space_ctl *ctl)
1146
{
1147
	struct btrfs_block_group_cache *block_group = ctl->private;
1148 1149 1150
	u64 max_bytes;
	u64 bitmap_bytes;
	u64 extent_bytes;
1151
	u64 size = block_group->key.offset;
1152 1153 1154 1155
	u64 bytes_per_bg = BITS_PER_BITMAP * block_group->sectorsize;
	int max_bitmaps = div64_u64(size + bytes_per_bg - 1, bytes_per_bg);

	BUG_ON(ctl->total_bitmaps > max_bitmaps);
1156 1157 1158 1159 1160 1161

	/*
	 * The goal is to keep the total amount of memory used per 1gb of space
	 * at or below 32k, so we need to adjust how much memory we allow to be
	 * used by extent based free space tracking
	 */
1162 1163 1164 1165 1166
	if (size < 1024 * 1024 * 1024)
		max_bytes = MAX_CACHE_BYTES_PER_GIG;
	else
		max_bytes = MAX_CACHE_BYTES_PER_GIG *
			div64_u64(size, 1024 * 1024 * 1024);
1167

1168 1169 1170 1171 1172
	/*
	 * we want to account for 1 more bitmap than what we have so we can make
	 * sure we don't go over our overall goal of MAX_CACHE_BYTES_PER_GIG as
	 * we add more bitmaps.
	 */
1173
	bitmap_bytes = (ctl->total_bitmaps + 1) * PAGE_CACHE_SIZE;
1174

1175
	if (bitmap_bytes >= max_bytes) {
1176
		ctl->extents_thresh = 0;
1177 1178
		return;
	}
1179

1180 1181 1182 1183 1184 1185
	/*
	 * we want the extent entry threshold to always be at most 1/2 the maxw
	 * bytes we can have, or whatever is less than that.
	 */
	extent_bytes = max_bytes - bitmap_bytes;
	extent_bytes = min_t(u64, extent_bytes, div64_u64(max_bytes, 2));
1186

1187
	ctl->extents_thresh =
1188
		div64_u64(extent_bytes, (sizeof(struct btrfs_free_space)));
1189 1190
}

1191
static void bitmap_clear_bits(struct btrfs_free_space_ctl *ctl,
J
Josef Bacik 已提交
1192 1193
			      struct btrfs_free_space *info, u64 offset,
			      u64 bytes)
1194
{
L
Li Zefan 已提交
1195
	unsigned long start, count;
1196

1197 1198
	start = offset_to_bit(info->offset, ctl->unit, offset);
	count = bytes_to_bits(bytes, ctl->unit);
L
Li Zefan 已提交
1199
	BUG_ON(start + count > BITS_PER_BITMAP);
1200

L
Li Zefan 已提交
1201
	bitmap_clear(info->bitmap, start, count);
1202 1203

	info->bytes -= bytes;
1204
	ctl->free_space -= bytes;
1205 1206
}

1207
static void bitmap_set_bits(struct btrfs_free_space_ctl *ctl,
J
Josef Bacik 已提交
1208 1209
			    struct btrfs_free_space *info, u64 offset,
			    u64 bytes)
1210
{
L
Li Zefan 已提交
1211
	unsigned long start, count;
1212

1213 1214
	start = offset_to_bit(info->offset, ctl->unit, offset);
	count = bytes_to_bits(bytes, ctl->unit);
L
Li Zefan 已提交
1215
	BUG_ON(start + count > BITS_PER_BITMAP);
1216

L
Li Zefan 已提交
1217
	bitmap_set(info->bitmap, start, count);
1218 1219

	info->bytes += bytes;
1220
	ctl->free_space += bytes;
1221 1222
}

1223
static int search_bitmap(struct btrfs_free_space_ctl *ctl,
1224 1225 1226 1227 1228 1229 1230
			 struct btrfs_free_space *bitmap_info, u64 *offset,
			 u64 *bytes)
{
	unsigned long found_bits = 0;
	unsigned long bits, i;
	unsigned long next_zero;

1231
	i = offset_to_bit(bitmap_info->offset, ctl->unit,
1232
			  max_t(u64, *offset, bitmap_info->offset));
1233
	bits = bytes_to_bits(*bytes, ctl->unit);
1234 1235 1236 1237 1238 1239 1240 1241 1242 1243 1244 1245 1246 1247

	for (i = find_next_bit(bitmap_info->bitmap, BITS_PER_BITMAP, i);
	     i < BITS_PER_BITMAP;
	     i = find_next_bit(bitmap_info->bitmap, BITS_PER_BITMAP, i + 1)) {
		next_zero = find_next_zero_bit(bitmap_info->bitmap,
					       BITS_PER_BITMAP, i);
		if ((next_zero - i) >= bits) {
			found_bits = next_zero - i;
			break;
		}
		i = next_zero;
	}

	if (found_bits) {
1248 1249
		*offset = (u64)(i * ctl->unit) + bitmap_info->offset;
		*bytes = (u64)(found_bits) * ctl->unit;
1250 1251 1252 1253 1254 1255
		return 0;
	}

	return -1;
}

1256 1257
static struct btrfs_free_space *
find_free_space(struct btrfs_free_space_ctl *ctl, u64 *offset, u64 *bytes)
1258 1259 1260 1261 1262
{
	struct btrfs_free_space *entry;
	struct rb_node *node;
	int ret;

1263
	if (!ctl->free_space_offset.rb_node)
1264 1265
		return NULL;

1266
	entry = tree_search_offset(ctl, offset_to_bitmap(ctl, *offset), 0, 1);
1267 1268 1269 1270 1271 1272 1273 1274 1275
	if (!entry)
		return NULL;

	for (node = &entry->offset_index; node; node = rb_next(node)) {
		entry = rb_entry(node, struct btrfs_free_space, offset_index);
		if (entry->bytes < *bytes)
			continue;

		if (entry->bitmap) {
1276
			ret = search_bitmap(ctl, entry, offset, bytes);
1277 1278 1279 1280 1281 1282 1283 1284 1285 1286 1287 1288 1289
			if (!ret)
				return entry;
			continue;
		}

		*offset = entry->offset;
		*bytes = entry->bytes;
		return entry;
	}

	return NULL;
}

1290
static void add_new_bitmap(struct btrfs_free_space_ctl *ctl,
1291 1292
			   struct btrfs_free_space *info, u64 offset)
{
1293
	info->offset = offset_to_bitmap(ctl, offset);
J
Josef Bacik 已提交
1294
	info->bytes = 0;
1295 1296
	link_free_space(ctl, info);
	ctl->total_bitmaps++;
1297

1298
	ctl->op->recalc_thresholds(ctl);
1299 1300
}

1301
static void free_bitmap(struct btrfs_free_space_ctl *ctl,
1302 1303
			struct btrfs_free_space *bitmap_info)
{
1304
	unlink_free_space(ctl, bitmap_info);
1305
	kfree(bitmap_info->bitmap);
1306
	kmem_cache_free(btrfs_free_space_cachep, bitmap_info);
1307 1308
	ctl->total_bitmaps--;
	ctl->op->recalc_thresholds(ctl);
1309 1310
}

1311
static noinline int remove_from_bitmap(struct btrfs_free_space_ctl *ctl,
1312 1313 1314 1315
			      struct btrfs_free_space *bitmap_info,
			      u64 *offset, u64 *bytes)
{
	u64 end;
1316 1317
	u64 search_start, search_bytes;
	int ret;
1318 1319

again:
1320
	end = bitmap_info->offset + (u64)(BITS_PER_BITMAP * ctl->unit) - 1;
1321

1322 1323 1324 1325 1326 1327 1328 1329 1330 1331 1332 1333
	/*
	 * XXX - this can go away after a few releases.
	 *
	 * since the only user of btrfs_remove_free_space is the tree logging
	 * stuff, and the only way to test that is under crash conditions, we
	 * want to have this debug stuff here just in case somethings not
	 * working.  Search the bitmap for the space we are trying to use to
	 * make sure its actually there.  If its not there then we need to stop
	 * because something has gone wrong.
	 */
	search_start = *offset;
	search_bytes = *bytes;
1334
	search_bytes = min(search_bytes, end - search_start + 1);
1335
	ret = search_bitmap(ctl, bitmap_info, &search_start, &search_bytes);
1336 1337
	BUG_ON(ret < 0 || search_start != *offset);

1338
	if (*offset > bitmap_info->offset && *offset + *bytes > end) {
1339
		bitmap_clear_bits(ctl, bitmap_info, *offset, end - *offset + 1);
1340 1341 1342
		*bytes -= end - *offset + 1;
		*offset = end + 1;
	} else if (*offset >= bitmap_info->offset && *offset + *bytes <= end) {
1343
		bitmap_clear_bits(ctl, bitmap_info, *offset, *bytes);
1344 1345 1346 1347
		*bytes = 0;
	}

	if (*bytes) {
1348
		struct rb_node *next = rb_next(&bitmap_info->offset_index);
1349
		if (!bitmap_info->bytes)
1350
			free_bitmap(ctl, bitmap_info);
1351

1352 1353 1354 1355 1356
		/*
		 * no entry after this bitmap, but we still have bytes to
		 * remove, so something has gone wrong.
		 */
		if (!next)
1357 1358
			return -EINVAL;

1359 1360 1361 1362 1363 1364 1365
		bitmap_info = rb_entry(next, struct btrfs_free_space,
				       offset_index);

		/*
		 * if the next entry isn't a bitmap we need to return to let the
		 * extent stuff do its work.
		 */
1366 1367 1368
		if (!bitmap_info->bitmap)
			return -EAGAIN;

1369 1370 1371 1372 1373 1374 1375 1376
		/*
		 * Ok the next item is a bitmap, but it may not actually hold
		 * the information for the rest of this free space stuff, so
		 * look for it, and if we don't find it return so we can try
		 * everything over again.
		 */
		search_start = *offset;
		search_bytes = *bytes;
1377
		ret = search_bitmap(ctl, bitmap_info, &search_start,
1378 1379 1380 1381
				    &search_bytes);
		if (ret < 0 || search_start != *offset)
			return -EAGAIN;

1382
		goto again;
1383
	} else if (!bitmap_info->bytes)
1384
		free_bitmap(ctl, bitmap_info);
1385 1386 1387 1388

	return 0;
}

1389 1390
static bool use_bitmap(struct btrfs_free_space_ctl *ctl,
		      struct btrfs_free_space *info)
1391
{
1392
	struct btrfs_block_group_cache *block_group = ctl->private;
1393 1394 1395 1396 1397

	/*
	 * If we are below the extents threshold then we can add this as an
	 * extent, and don't have to deal with the bitmap
	 */
1398
	if (ctl->free_extents < ctl->extents_thresh) {
1399 1400 1401 1402 1403 1404 1405 1406
		/*
		 * If this block group has some small extents we don't want to
		 * use up all of our free slots in the cache with them, we want
		 * to reserve them to larger extents, however if we have plent
		 * of cache left then go ahead an dadd them, no sense in adding
		 * the overhead of a bitmap if we don't have to.
		 */
		if (info->bytes <= block_group->sectorsize * 4) {
1407 1408
			if (ctl->free_extents * 2 <= ctl->extents_thresh)
				return false;
1409
		} else {
1410
			return false;
1411 1412
		}
	}
1413 1414 1415 1416 1417 1418 1419

	/*
	 * some block groups are so tiny they can't be enveloped by a bitmap, so
	 * don't even bother to create a bitmap for this
	 */
	if (BITS_PER_BITMAP * block_group->sectorsize >
	    block_group->key.offset)
1420 1421 1422 1423 1424 1425 1426 1427 1428 1429 1430 1431
		return false;

	return true;
}

static int insert_into_bitmap(struct btrfs_free_space_ctl *ctl,
			      struct btrfs_free_space *info)
{
	struct btrfs_free_space *bitmap_info;
	int added = 0;
	u64 bytes, offset, end;
	int ret;
1432 1433 1434 1435

	bytes = info->bytes;
	offset = info->offset;

1436 1437 1438
	if (!ctl->op->use_bitmap(ctl, info))
		return 0;

1439
again:
1440
	bitmap_info = tree_search_offset(ctl, offset_to_bitmap(ctl, offset),
1441 1442 1443 1444 1445 1446
					 1, 0);
	if (!bitmap_info) {
		BUG_ON(added);
		goto new_bitmap;
	}

1447
	end = bitmap_info->offset + (u64)(BITS_PER_BITMAP * ctl->unit);
1448 1449

	if (offset >= bitmap_info->offset && offset + bytes > end) {
1450
		bitmap_set_bits(ctl, bitmap_info, offset, end - offset);
1451 1452 1453 1454
		bytes -= end - offset;
		offset = end;
		added = 0;
	} else if (offset >= bitmap_info->offset && offset + bytes <= end) {
1455
		bitmap_set_bits(ctl, bitmap_info, offset, bytes);
1456 1457 1458 1459 1460 1461 1462 1463 1464 1465 1466 1467 1468
		bytes = 0;
	} else {
		BUG();
	}

	if (!bytes) {
		ret = 1;
		goto out;
	} else
		goto again;

new_bitmap:
	if (info && info->bitmap) {
1469
		add_new_bitmap(ctl, info, offset);
1470 1471 1472 1473
		added = 1;
		info = NULL;
		goto again;
	} else {
1474
		spin_unlock(&ctl->tree_lock);
1475 1476 1477

		/* no pre-allocated info, allocate a new one */
		if (!info) {
1478 1479
			info = kmem_cache_zalloc(btrfs_free_space_cachep,
						 GFP_NOFS);
1480
			if (!info) {
1481
				spin_lock(&ctl->tree_lock);
1482 1483 1484 1485 1486 1487 1488
				ret = -ENOMEM;
				goto out;
			}
		}

		/* allocate the bitmap */
		info->bitmap = kzalloc(PAGE_CACHE_SIZE, GFP_NOFS);
1489
		spin_lock(&ctl->tree_lock);
1490 1491 1492 1493 1494 1495 1496 1497 1498 1499 1500
		if (!info->bitmap) {
			ret = -ENOMEM;
			goto out;
		}
		goto again;
	}

out:
	if (info) {
		if (info->bitmap)
			kfree(info->bitmap);
1501
		kmem_cache_free(btrfs_free_space_cachep, info);
1502
	}
J
Josef Bacik 已提交
1503 1504 1505 1506

	return ret;
}

1507
bool try_merge_free_space(struct btrfs_free_space_ctl *ctl,
1508
			  struct btrfs_free_space *info, bool update_stat)
J
Josef Bacik 已提交
1509
{
1510 1511 1512 1513 1514
	struct btrfs_free_space *left_info;
	struct btrfs_free_space *right_info;
	bool merged = false;
	u64 offset = info->offset;
	u64 bytes = info->bytes;
1515

J
Josef Bacik 已提交
1516 1517 1518 1519 1520
	/*
	 * first we want to see if there is free space adjacent to the range we
	 * are adding, if there is remove that struct and add a new one to
	 * cover the entire range
	 */
1521
	right_info = tree_search_offset(ctl, offset + bytes, 0, 0);
1522 1523 1524 1525
	if (right_info && rb_prev(&right_info->offset_index))
		left_info = rb_entry(rb_prev(&right_info->offset_index),
				     struct btrfs_free_space, offset_index);
	else
1526
		left_info = tree_search_offset(ctl, offset - 1, 0, 0);
J
Josef Bacik 已提交
1527

1528
	if (right_info && !right_info->bitmap) {
1529
		if (update_stat)
1530
			unlink_free_space(ctl, right_info);
1531
		else
1532
			__unlink_free_space(ctl, right_info);
1533
		info->bytes += right_info->bytes;
1534
		kmem_cache_free(btrfs_free_space_cachep, right_info);
1535
		merged = true;
J
Josef Bacik 已提交
1536 1537
	}

1538 1539
	if (left_info && !left_info->bitmap &&
	    left_info->offset + left_info->bytes == offset) {
1540
		if (update_stat)
1541
			unlink_free_space(ctl, left_info);
1542
		else
1543
			__unlink_free_space(ctl, left_info);
1544 1545
		info->offset = left_info->offset;
		info->bytes += left_info->bytes;
1546
		kmem_cache_free(btrfs_free_space_cachep, left_info);
1547
		merged = true;
J
Josef Bacik 已提交
1548 1549
	}

1550 1551 1552
	return merged;
}

1553 1554
int __btrfs_add_free_space(struct btrfs_free_space_ctl *ctl,
			   u64 offset, u64 bytes)
1555 1556 1557 1558
{
	struct btrfs_free_space *info;
	int ret = 0;

1559
	info = kmem_cache_zalloc(btrfs_free_space_cachep, GFP_NOFS);
1560 1561 1562 1563 1564 1565
	if (!info)
		return -ENOMEM;

	info->offset = offset;
	info->bytes = bytes;

1566
	spin_lock(&ctl->tree_lock);
1567

1568
	if (try_merge_free_space(ctl, info, true))
1569 1570 1571 1572 1573 1574 1575
		goto link;

	/*
	 * There was no extent directly to the left or right of this new
	 * extent then we know we're going to have to allocate a new extent, so
	 * before we do that see if we need to drop this into a bitmap
	 */
1576
	ret = insert_into_bitmap(ctl, info);
1577 1578 1579 1580 1581 1582 1583
	if (ret < 0) {
		goto out;
	} else if (ret) {
		ret = 0;
		goto out;
	}
link:
1584
	ret = link_free_space(ctl, info);
J
Josef Bacik 已提交
1585
	if (ret)
1586
		kmem_cache_free(btrfs_free_space_cachep, info);
1587
out:
1588
	spin_unlock(&ctl->tree_lock);
1589

J
Josef Bacik 已提交
1590
	if (ret) {
1591
		printk(KERN_CRIT "btrfs: unable to add free space :%d\n", ret);
S
Stoyan Gaydarov 已提交
1592
		BUG_ON(ret == -EEXIST);
J
Josef Bacik 已提交
1593 1594 1595 1596 1597
	}

	return ret;
}

1598 1599
int btrfs_remove_free_space(struct btrfs_block_group_cache *block_group,
			    u64 offset, u64 bytes)
J
Josef Bacik 已提交
1600
{
1601
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
J
Josef Bacik 已提交
1602
	struct btrfs_free_space *info;
1603
	struct btrfs_free_space *next_info = NULL;
J
Josef Bacik 已提交
1604 1605
	int ret = 0;

1606
	spin_lock(&ctl->tree_lock);
1607

1608
again:
1609
	info = tree_search_offset(ctl, offset, 0, 0);
1610
	if (!info) {
1611 1612 1613 1614
		/*
		 * oops didn't find an extent that matched the space we wanted
		 * to remove, look for a bitmap instead
		 */
1615
		info = tree_search_offset(ctl, offset_to_bitmap(ctl, offset),
1616 1617 1618 1619 1620
					  1, 0);
		if (!info) {
			WARN_ON(1);
			goto out_lock;
		}
1621 1622 1623 1624 1625 1626 1627 1628 1629
	}

	if (info->bytes < bytes && rb_next(&info->offset_index)) {
		u64 end;
		next_info = rb_entry(rb_next(&info->offset_index),
					     struct btrfs_free_space,
					     offset_index);

		if (next_info->bitmap)
1630 1631
			end = next_info->offset +
			      BITS_PER_BITMAP * ctl->unit - 1;
1632 1633 1634 1635 1636 1637 1638 1639 1640 1641
		else
			end = next_info->offset + next_info->bytes;

		if (next_info->bytes < bytes ||
		    next_info->offset > offset || offset > end) {
			printk(KERN_CRIT "Found free space at %llu, size %llu,"
			      " trying to use %llu\n",
			      (unsigned long long)info->offset,
			      (unsigned long long)info->bytes,
			      (unsigned long long)bytes);
J
Josef Bacik 已提交
1642 1643
			WARN_ON(1);
			ret = -EINVAL;
1644
			goto out_lock;
J
Josef Bacik 已提交
1645 1646
		}

1647 1648 1649 1650
		info = next_info;
	}

	if (info->bytes == bytes) {
1651
		unlink_free_space(ctl, info);
1652 1653
		if (info->bitmap) {
			kfree(info->bitmap);
1654
			ctl->total_bitmaps--;
J
Josef Bacik 已提交
1655
		}
1656
		kmem_cache_free(btrfs_free_space_cachep, info);
1657 1658
		goto out_lock;
	}
J
Josef Bacik 已提交
1659

1660
	if (!info->bitmap && info->offset == offset) {
1661
		unlink_free_space(ctl, info);
J
Josef Bacik 已提交
1662 1663
		info->offset += bytes;
		info->bytes -= bytes;
1664
		link_free_space(ctl, info);
1665 1666
		goto out_lock;
	}
J
Josef Bacik 已提交
1667

1668 1669
	if (!info->bitmap && info->offset <= offset &&
	    info->offset + info->bytes >= offset + bytes) {
1670 1671 1672 1673 1674 1675 1676 1677
		u64 old_start = info->offset;
		/*
		 * we're freeing space in the middle of the info,
		 * this can happen during tree log replay
		 *
		 * first unlink the old info and then
		 * insert it again after the hole we're creating
		 */
1678
		unlink_free_space(ctl, info);
1679 1680 1681 1682 1683
		if (offset + bytes < info->offset + info->bytes) {
			u64 old_end = info->offset + info->bytes;

			info->offset = offset + bytes;
			info->bytes = old_end - info->offset;
1684
			ret = link_free_space(ctl, info);
1685 1686 1687
			WARN_ON(ret);
			if (ret)
				goto out_lock;
1688 1689 1690 1691
		} else {
			/* the hole we're creating ends at the end
			 * of the info struct, just free the info
			 */
1692
			kmem_cache_free(btrfs_free_space_cachep, info);
1693
		}
1694
		spin_unlock(&ctl->tree_lock);
1695 1696 1697

		/* step two, insert a new info struct to cover
		 * anything before the hole
1698
		 */
1699 1700
		ret = btrfs_add_free_space(block_group, old_start,
					   offset - old_start);
1701 1702
		WARN_ON(ret);
		goto out;
J
Josef Bacik 已提交
1703
	}
1704

1705
	ret = remove_from_bitmap(ctl, info, &offset, &bytes);
1706 1707 1708 1709
	if (ret == -EAGAIN)
		goto again;
	BUG_ON(ret);
out_lock:
1710
	spin_unlock(&ctl->tree_lock);
J
Josef Bacik 已提交
1711
out:
1712 1713 1714
	return ret;
}

J
Josef Bacik 已提交
1715 1716 1717
void btrfs_dump_free_space(struct btrfs_block_group_cache *block_group,
			   u64 bytes)
{
1718
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
J
Josef Bacik 已提交
1719 1720 1721 1722
	struct btrfs_free_space *info;
	struct rb_node *n;
	int count = 0;

1723
	for (n = rb_first(&ctl->free_space_offset); n; n = rb_next(n)) {
J
Josef Bacik 已提交
1724 1725 1726
		info = rb_entry(n, struct btrfs_free_space, offset_index);
		if (info->bytes >= bytes)
			count++;
1727
		printk(KERN_CRIT "entry offset %llu, bytes %llu, bitmap %s\n",
1728
		       (unsigned long long)info->offset,
1729 1730
		       (unsigned long long)info->bytes,
		       (info->bitmap) ? "yes" : "no");
J
Josef Bacik 已提交
1731
	}
1732 1733
	printk(KERN_INFO "block group has cluster?: %s\n",
	       list_empty(&block_group->cluster_list) ? "no" : "yes");
J
Josef Bacik 已提交
1734 1735 1736 1737
	printk(KERN_INFO "%d blocks of free space at or bigger than bytes is"
	       "\n", count);
}

1738 1739 1740 1741 1742 1743 1744 1745 1746 1747 1748 1749 1750 1751 1752 1753 1754 1755 1756 1757 1758 1759 1760 1761
static struct btrfs_free_space_op free_space_op = {
	.recalc_thresholds	= recalculate_thresholds,
	.use_bitmap		= use_bitmap,
};

void btrfs_init_free_space_ctl(struct btrfs_block_group_cache *block_group)
{
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;

	spin_lock_init(&ctl->tree_lock);
	ctl->unit = block_group->sectorsize;
	ctl->start = block_group->key.objectid;
	ctl->private = block_group;
	ctl->op = &free_space_op;

	/*
	 * we only want to have 32k of ram per block group for keeping
	 * track of free space, and if we pass 1/2 of that we want to
	 * start converting things over to using bitmaps
	 */
	ctl->extents_thresh = ((1024 * 32) / 2) /
				sizeof(struct btrfs_free_space);
}

1762 1763 1764 1765 1766 1767 1768 1769 1770 1771 1772
/*
 * for a given cluster, put all of its extents back into the free
 * space cache.  If the block group passed doesn't match the block group
 * pointed to by the cluster, someone else raced in and freed the
 * cluster already.  In that case, we just return without changing anything
 */
static int
__btrfs_return_cluster_to_free_space(
			     struct btrfs_block_group_cache *block_group,
			     struct btrfs_free_cluster *cluster)
{
1773
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
1774 1775 1776 1777 1778 1779 1780
	struct btrfs_free_space *entry;
	struct rb_node *node;

	spin_lock(&cluster->lock);
	if (cluster->block_group != block_group)
		goto out;

1781
	cluster->block_group = NULL;
1782
	cluster->window_start = 0;
1783 1784
	list_del_init(&cluster->block_group_list);

1785
	node = rb_first(&cluster->root);
1786
	while (node) {
1787 1788
		bool bitmap;

1789 1790 1791
		entry = rb_entry(node, struct btrfs_free_space, offset_index);
		node = rb_next(&entry->offset_index);
		rb_erase(&entry->offset_index, &cluster->root);
1792 1793 1794

		bitmap = (entry->bitmap != NULL);
		if (!bitmap)
1795 1796
			try_merge_free_space(ctl, entry, false);
		tree_insert_offset(&ctl->free_space_offset,
1797
				   entry->offset, &entry->offset_index, bitmap);
1798
	}
1799
	cluster->root = RB_ROOT;
1800

1801 1802
out:
	spin_unlock(&cluster->lock);
1803
	btrfs_put_block_group(block_group);
1804 1805 1806
	return 0;
}

1807
void __btrfs_remove_free_space_cache(struct btrfs_free_space_ctl *ctl)
J
Josef Bacik 已提交
1808 1809 1810
{
	struct btrfs_free_space *info;
	struct rb_node *node;
1811 1812 1813 1814 1815 1816 1817 1818 1819 1820 1821 1822 1823 1824 1825 1826 1827 1828 1829

	spin_lock(&ctl->tree_lock);
	while ((node = rb_last(&ctl->free_space_offset)) != NULL) {
		info = rb_entry(node, struct btrfs_free_space, offset_index);
		unlink_free_space(ctl, info);
		kfree(info->bitmap);
		kmem_cache_free(btrfs_free_space_cachep, info);
		if (need_resched()) {
			spin_unlock(&ctl->tree_lock);
			cond_resched();
			spin_lock(&ctl->tree_lock);
		}
	}
	spin_unlock(&ctl->tree_lock);
}

void btrfs_remove_free_space_cache(struct btrfs_block_group_cache *block_group)
{
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
1830
	struct btrfs_free_cluster *cluster;
1831
	struct list_head *head;
J
Josef Bacik 已提交
1832

1833
	spin_lock(&ctl->tree_lock);
1834 1835 1836 1837
	while ((head = block_group->cluster_list.next) !=
	       &block_group->cluster_list) {
		cluster = list_entry(head, struct btrfs_free_cluster,
				     block_group_list);
1838 1839 1840

		WARN_ON(cluster->block_group != block_group);
		__btrfs_return_cluster_to_free_space(block_group, cluster);
1841
		if (need_resched()) {
1842
			spin_unlock(&ctl->tree_lock);
1843
			cond_resched();
1844
			spin_lock(&ctl->tree_lock);
1845
		}
1846
	}
1847
	spin_unlock(&ctl->tree_lock);
1848 1849

	__btrfs_remove_free_space_cache(ctl);
J
Josef Bacik 已提交
1850 1851
}

1852 1853
u64 btrfs_find_space_for_alloc(struct btrfs_block_group_cache *block_group,
			       u64 offset, u64 bytes, u64 empty_size)
J
Josef Bacik 已提交
1854
{
1855
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
1856
	struct btrfs_free_space *entry = NULL;
1857
	u64 bytes_search = bytes + empty_size;
1858
	u64 ret = 0;
J
Josef Bacik 已提交
1859

1860 1861
	spin_lock(&ctl->tree_lock);
	entry = find_free_space(ctl, &offset, &bytes_search);
1862
	if (!entry)
1863 1864 1865 1866
		goto out;

	ret = offset;
	if (entry->bitmap) {
1867
		bitmap_clear_bits(ctl, entry, offset, bytes);
1868
		if (!entry->bytes)
1869
			free_bitmap(ctl, entry);
1870
	} else {
1871
		unlink_free_space(ctl, entry);
1872 1873 1874
		entry->offset += bytes;
		entry->bytes -= bytes;
		if (!entry->bytes)
1875
			kmem_cache_free(btrfs_free_space_cachep, entry);
1876
		else
1877
			link_free_space(ctl, entry);
1878
	}
J
Josef Bacik 已提交
1879

1880
out:
1881
	spin_unlock(&ctl->tree_lock);
J
Josef Bacik 已提交
1882

J
Josef Bacik 已提交
1883 1884
	return ret;
}
1885 1886 1887 1888 1889 1890 1891 1892 1893 1894 1895 1896 1897

/*
 * given a cluster, put all of its extents back into the free space
 * cache.  If a block group is passed, this function will only free
 * a cluster that belongs to the passed block group.
 *
 * Otherwise, it'll get a reference on the block group pointed to by the
 * cluster and remove the cluster from it.
 */
int btrfs_return_cluster_to_free_space(
			       struct btrfs_block_group_cache *block_group,
			       struct btrfs_free_cluster *cluster)
{
1898
	struct btrfs_free_space_ctl *ctl;
1899 1900 1901 1902 1903 1904 1905 1906 1907 1908 1909 1910 1911 1912 1913 1914 1915 1916
	int ret;

	/* first, get a safe pointer to the block group */
	spin_lock(&cluster->lock);
	if (!block_group) {
		block_group = cluster->block_group;
		if (!block_group) {
			spin_unlock(&cluster->lock);
			return 0;
		}
	} else if (cluster->block_group != block_group) {
		/* someone else has already freed it don't redo their work */
		spin_unlock(&cluster->lock);
		return 0;
	}
	atomic_inc(&block_group->count);
	spin_unlock(&cluster->lock);

1917 1918
	ctl = block_group->free_space_ctl;

1919
	/* now return any extents the cluster had on it */
1920
	spin_lock(&ctl->tree_lock);
1921
	ret = __btrfs_return_cluster_to_free_space(block_group, cluster);
1922
	spin_unlock(&ctl->tree_lock);
1923 1924 1925 1926 1927 1928

	/* finally drop our ref */
	btrfs_put_block_group(block_group);
	return ret;
}

1929 1930
static u64 btrfs_alloc_from_bitmap(struct btrfs_block_group_cache *block_group,
				   struct btrfs_free_cluster *cluster,
1931
				   struct btrfs_free_space *entry,
1932 1933
				   u64 bytes, u64 min_start)
{
1934
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
1935 1936 1937 1938 1939 1940 1941 1942
	int err;
	u64 search_start = cluster->window_start;
	u64 search_bytes = bytes;
	u64 ret = 0;

	search_start = min_start;
	search_bytes = bytes;

1943
	err = search_bitmap(ctl, entry, &search_start, &search_bytes);
1944
	if (err)
1945
		return 0;
1946 1947

	ret = search_start;
1948
	bitmap_clear_bits(ctl, entry, ret, bytes);
1949 1950 1951 1952

	return ret;
}

1953 1954 1955 1956 1957 1958 1959 1960 1961
/*
 * given a cluster, try to allocate 'bytes' from it, returns 0
 * if it couldn't find anything suitably large, or a logical disk offset
 * if things worked out
 */
u64 btrfs_alloc_from_cluster(struct btrfs_block_group_cache *block_group,
			     struct btrfs_free_cluster *cluster, u64 bytes,
			     u64 min_start)
{
1962
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
1963 1964 1965 1966 1967 1968 1969 1970 1971 1972 1973 1974 1975 1976 1977 1978 1979
	struct btrfs_free_space *entry = NULL;
	struct rb_node *node;
	u64 ret = 0;

	spin_lock(&cluster->lock);
	if (bytes > cluster->max_size)
		goto out;

	if (cluster->block_group != block_group)
		goto out;

	node = rb_first(&cluster->root);
	if (!node)
		goto out;

	entry = rb_entry(node, struct btrfs_free_space, offset_index);
	while(1) {
1980 1981
		if (entry->bytes < bytes ||
		    (!entry->bitmap && entry->offset < min_start)) {
1982 1983 1984 1985 1986 1987 1988 1989 1990 1991
			struct rb_node *node;

			node = rb_next(&entry->offset_index);
			if (!node)
				break;
			entry = rb_entry(node, struct btrfs_free_space,
					 offset_index);
			continue;
		}

1992 1993 1994 1995 1996 1997 1998 1999 2000 2001 2002 2003 2004 2005 2006 2007 2008 2009 2010 2011
		if (entry->bitmap) {
			ret = btrfs_alloc_from_bitmap(block_group,
						      cluster, entry, bytes,
						      min_start);
			if (ret == 0) {
				struct rb_node *node;
				node = rb_next(&entry->offset_index);
				if (!node)
					break;
				entry = rb_entry(node, struct btrfs_free_space,
						 offset_index);
				continue;
			}
		} else {

			ret = entry->offset;

			entry->offset += bytes;
			entry->bytes -= bytes;
		}
2012

2013
		if (entry->bytes == 0)
2014 2015 2016 2017 2018
			rb_erase(&entry->offset_index, &cluster->root);
		break;
	}
out:
	spin_unlock(&cluster->lock);
2019

2020 2021 2022
	if (!ret)
		return 0;

2023
	spin_lock(&ctl->tree_lock);
2024

2025
	ctl->free_space -= bytes;
2026
	if (entry->bytes == 0) {
2027
		ctl->free_extents--;
2028 2029
		if (entry->bitmap) {
			kfree(entry->bitmap);
2030 2031
			ctl->total_bitmaps--;
			ctl->op->recalc_thresholds(ctl);
2032
		}
2033
		kmem_cache_free(btrfs_free_space_cachep, entry);
2034 2035
	}

2036
	spin_unlock(&ctl->tree_lock);
2037

2038 2039 2040
	return ret;
}

2041 2042 2043 2044 2045
static int btrfs_bitmap_cluster(struct btrfs_block_group_cache *block_group,
				struct btrfs_free_space *entry,
				struct btrfs_free_cluster *cluster,
				u64 offset, u64 bytes, u64 min_bytes)
{
2046
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
2047 2048 2049 2050 2051 2052 2053
	unsigned long next_zero;
	unsigned long i;
	unsigned long search_bits;
	unsigned long total_bits;
	unsigned long found_bits;
	unsigned long start = 0;
	unsigned long total_found = 0;
2054
	int ret;
2055 2056 2057 2058
	bool found = false;

	i = offset_to_bit(entry->offset, block_group->sectorsize,
			  max_t(u64, offset, entry->offset));
2059 2060
	search_bits = bytes_to_bits(bytes, block_group->sectorsize);
	total_bits = bytes_to_bits(min_bytes, block_group->sectorsize);
2061 2062 2063 2064 2065 2066 2067 2068 2069 2070 2071 2072 2073 2074 2075 2076

again:
	found_bits = 0;
	for (i = find_next_bit(entry->bitmap, BITS_PER_BITMAP, i);
	     i < BITS_PER_BITMAP;
	     i = find_next_bit(entry->bitmap, BITS_PER_BITMAP, i + 1)) {
		next_zero = find_next_zero_bit(entry->bitmap,
					       BITS_PER_BITMAP, i);
		if (next_zero - i >= search_bits) {
			found_bits = next_zero - i;
			break;
		}
		i = next_zero;
	}

	if (!found_bits)
2077
		return -ENOSPC;
2078 2079 2080 2081 2082 2083 2084 2085 2086 2087 2088 2089 2090 2091 2092 2093 2094 2095 2096 2097 2098 2099 2100

	if (!found) {
		start = i;
		found = true;
	}

	total_found += found_bits;

	if (cluster->max_size < found_bits * block_group->sectorsize)
		cluster->max_size = found_bits * block_group->sectorsize;

	if (total_found < total_bits) {
		i = find_next_bit(entry->bitmap, BITS_PER_BITMAP, next_zero);
		if (i - start > total_bits * 2) {
			total_found = 0;
			cluster->max_size = 0;
			found = false;
		}
		goto again;
	}

	cluster->window_start = start * block_group->sectorsize +
		entry->offset;
2101
	rb_erase(&entry->offset_index, &ctl->free_space_offset);
2102 2103 2104
	ret = tree_insert_offset(&cluster->root, entry->offset,
				 &entry->offset_index, 1);
	BUG_ON(ret);
2105 2106 2107 2108

	return 0;
}

2109 2110 2111 2112 2113 2114 2115
/*
 * This searches the block group for just extents to fill the cluster with.
 */
static int setup_cluster_no_bitmap(struct btrfs_block_group_cache *block_group,
				   struct btrfs_free_cluster *cluster,
				   u64 offset, u64 bytes, u64 min_bytes)
{
2116
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
2117 2118 2119 2120 2121 2122 2123 2124 2125 2126
	struct btrfs_free_space *first = NULL;
	struct btrfs_free_space *entry = NULL;
	struct btrfs_free_space *prev = NULL;
	struct btrfs_free_space *last;
	struct rb_node *node;
	u64 window_start;
	u64 window_free;
	u64 max_extent;
	u64 max_gap = 128 * 1024;

2127
	entry = tree_search_offset(ctl, offset, 0, 1);
2128 2129 2130 2131 2132 2133 2134 2135 2136 2137 2138 2139 2140 2141 2142 2143 2144 2145 2146 2147 2148 2149 2150 2151 2152 2153 2154 2155 2156 2157 2158 2159 2160 2161 2162 2163 2164 2165 2166 2167 2168 2169 2170 2171 2172 2173 2174 2175 2176 2177 2178 2179 2180 2181 2182 2183 2184 2185 2186 2187 2188 2189 2190 2191 2192
	if (!entry)
		return -ENOSPC;

	/*
	 * We don't want bitmaps, so just move along until we find a normal
	 * extent entry.
	 */
	while (entry->bitmap) {
		node = rb_next(&entry->offset_index);
		if (!node)
			return -ENOSPC;
		entry = rb_entry(node, struct btrfs_free_space, offset_index);
	}

	window_start = entry->offset;
	window_free = entry->bytes;
	max_extent = entry->bytes;
	first = entry;
	last = entry;
	prev = entry;

	while (window_free <= min_bytes) {
		node = rb_next(&entry->offset_index);
		if (!node)
			return -ENOSPC;
		entry = rb_entry(node, struct btrfs_free_space, offset_index);

		if (entry->bitmap)
			continue;
		/*
		 * we haven't filled the empty size and the window is
		 * very large.  reset and try again
		 */
		if (entry->offset - (prev->offset + prev->bytes) > max_gap ||
		    entry->offset - window_start > (min_bytes * 2)) {
			first = entry;
			window_start = entry->offset;
			window_free = entry->bytes;
			last = entry;
			max_extent = entry->bytes;
		} else {
			last = entry;
			window_free += entry->bytes;
			if (entry->bytes > max_extent)
				max_extent = entry->bytes;
		}
		prev = entry;
	}

	cluster->window_start = first->offset;

	node = &first->offset_index;

	/*
	 * now we've found our entries, pull them out of the free space
	 * cache and put them into the cluster rbtree
	 */
	do {
		int ret;

		entry = rb_entry(node, struct btrfs_free_space, offset_index);
		node = rb_next(&entry->offset_index);
		if (entry->bitmap)
			continue;

2193
		rb_erase(&entry->offset_index, &ctl->free_space_offset);
2194 2195 2196 2197 2198 2199 2200 2201 2202 2203 2204 2205 2206 2207 2208 2209 2210 2211
		ret = tree_insert_offset(&cluster->root, entry->offset,
					 &entry->offset_index, 0);
		BUG_ON(ret);
	} while (node && entry != last);

	cluster->max_size = max_extent;

	return 0;
}

/*
 * This specifically looks for bitmaps that may work in the cluster, we assume
 * that we have already failed to find extents that will work.
 */
static int setup_cluster_bitmap(struct btrfs_block_group_cache *block_group,
				struct btrfs_free_cluster *cluster,
				u64 offset, u64 bytes, u64 min_bytes)
{
2212
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
2213 2214 2215 2216
	struct btrfs_free_space *entry;
	struct rb_node *node;
	int ret = -ENOSPC;

2217
	if (ctl->total_bitmaps == 0)
2218 2219
		return -ENOSPC;

2220
	entry = tree_search_offset(ctl, offset_to_bitmap(ctl, offset), 0, 1);
2221 2222 2223 2224 2225 2226 2227 2228 2229 2230 2231 2232 2233 2234 2235 2236 2237 2238
	if (!entry)
		return -ENOSPC;

	node = &entry->offset_index;
	do {
		entry = rb_entry(node, struct btrfs_free_space, offset_index);
		node = rb_next(&entry->offset_index);
		if (!entry->bitmap)
			continue;
		if (entry->bytes < min_bytes)
			continue;
		ret = btrfs_bitmap_cluster(block_group, entry, cluster, offset,
					   bytes, min_bytes);
	} while (ret && node);

	return ret;
}

2239 2240 2241 2242 2243 2244 2245 2246 2247
/*
 * here we try to find a cluster of blocks in a block group.  The goal
 * is to find at least bytes free and up to empty_size + bytes free.
 * We might not find them all in one contiguous area.
 *
 * returns zero and sets up cluster if things worked out, otherwise
 * it returns -enospc
 */
int btrfs_find_space_cluster(struct btrfs_trans_handle *trans,
2248
			     struct btrfs_root *root,
2249 2250 2251 2252
			     struct btrfs_block_group_cache *block_group,
			     struct btrfs_free_cluster *cluster,
			     u64 offset, u64 bytes, u64 empty_size)
{
2253
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
2254 2255 2256 2257
	u64 min_bytes;
	int ret;

	/* for metadata, allow allocates with more holes */
2258 2259 2260
	if (btrfs_test_opt(root, SSD_SPREAD)) {
		min_bytes = bytes + empty_size;
	} else if (block_group->flags & BTRFS_BLOCK_GROUP_METADATA) {
2261 2262 2263 2264 2265 2266 2267 2268 2269 2270 2271 2272
		/*
		 * we want to do larger allocations when we are
		 * flushing out the delayed refs, it helps prevent
		 * making more work as we go along.
		 */
		if (trans->transaction->delayed_refs.flushing)
			min_bytes = max(bytes, (bytes + empty_size) >> 1);
		else
			min_bytes = max(bytes, (bytes + empty_size) >> 4);
	} else
		min_bytes = max(bytes, (bytes + empty_size) >> 2);

2273
	spin_lock(&ctl->tree_lock);
2274 2275 2276 2277 2278

	/*
	 * If we know we don't have enough space to make a cluster don't even
	 * bother doing all the work to try and find one.
	 */
2279 2280
	if (ctl->free_space < min_bytes) {
		spin_unlock(&ctl->tree_lock);
2281 2282 2283
		return -ENOSPC;
	}

2284 2285 2286 2287 2288 2289 2290 2291
	spin_lock(&cluster->lock);

	/* someone already found a cluster, hooray */
	if (cluster->block_group) {
		ret = 0;
		goto out;
	}

2292 2293 2294 2295 2296
	ret = setup_cluster_no_bitmap(block_group, cluster, offset, bytes,
				      min_bytes);
	if (ret)
		ret = setup_cluster_bitmap(block_group, cluster, offset,
					   bytes, min_bytes);
2297

2298 2299 2300 2301 2302
	if (!ret) {
		atomic_inc(&block_group->count);
		list_add_tail(&cluster->block_group_list,
			      &block_group->cluster_list);
		cluster->block_group = block_group;
2303 2304 2305
	}
out:
	spin_unlock(&cluster->lock);
2306
	spin_unlock(&ctl->tree_lock);
2307 2308 2309 2310 2311 2312 2313 2314 2315 2316 2317

	return ret;
}

/*
 * simple code to zero out a cluster
 */
void btrfs_init_free_cluster(struct btrfs_free_cluster *cluster)
{
	spin_lock_init(&cluster->lock);
	spin_lock_init(&cluster->refill_lock);
2318
	cluster->root = RB_ROOT;
2319 2320 2321 2322 2323
	cluster->max_size = 0;
	INIT_LIST_HEAD(&cluster->block_group_list);
	cluster->block_group = NULL;
}

2324 2325 2326
int btrfs_trim_block_group(struct btrfs_block_group_cache *block_group,
			   u64 *trimmed, u64 start, u64 end, u64 minlen)
{
2327
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
2328 2329 2330 2331 2332 2333 2334 2335 2336
	struct btrfs_free_space *entry = NULL;
	struct btrfs_fs_info *fs_info = block_group->fs_info;
	u64 bytes = 0;
	u64 actually_trimmed;
	int ret = 0;

	*trimmed = 0;

	while (start < end) {
2337
		spin_lock(&ctl->tree_lock);
2338

2339 2340
		if (ctl->free_space < minlen) {
			spin_unlock(&ctl->tree_lock);
2341 2342 2343
			break;
		}

2344
		entry = tree_search_offset(ctl, start, 0, 1);
2345
		if (!entry)
2346 2347
			entry = tree_search_offset(ctl,
						   offset_to_bitmap(ctl, start),
2348 2349 2350
						   1, 1);

		if (!entry || entry->offset >= end) {
2351
			spin_unlock(&ctl->tree_lock);
2352 2353 2354 2355
			break;
		}

		if (entry->bitmap) {
2356
			ret = search_bitmap(ctl, entry, &start, &bytes);
2357 2358
			if (!ret) {
				if (start >= end) {
2359
					spin_unlock(&ctl->tree_lock);
2360 2361 2362
					break;
				}
				bytes = min(bytes, end - start);
2363
				bitmap_clear_bits(ctl, entry, start, bytes);
2364
				if (entry->bytes == 0)
2365
					free_bitmap(ctl, entry);
2366 2367 2368
			} else {
				start = entry->offset + BITS_PER_BITMAP *
					block_group->sectorsize;
2369
				spin_unlock(&ctl->tree_lock);
2370 2371 2372 2373 2374 2375
				ret = 0;
				continue;
			}
		} else {
			start = entry->offset;
			bytes = min(entry->bytes, end - start);
2376
			unlink_free_space(ctl, entry);
2377 2378 2379
			kfree(entry);
		}

2380
		spin_unlock(&ctl->tree_lock);
2381 2382 2383 2384 2385 2386 2387 2388 2389 2390 2391

		if (bytes >= minlen) {
			int update_ret;
			update_ret = btrfs_update_reserved_bytes(block_group,
								 bytes, 1, 1);

			ret = btrfs_error_discard_extent(fs_info->extent_root,
							 start,
							 bytes,
							 &actually_trimmed);

2392
			btrfs_add_free_space(block_group, start, bytes);
2393 2394 2395 2396 2397 2398 2399 2400 2401 2402 2403 2404 2405 2406 2407 2408 2409 2410 2411 2412 2413
			if (!update_ret)
				btrfs_update_reserved_bytes(block_group,
							    bytes, 0, 1);

			if (ret)
				break;
			*trimmed += actually_trimmed;
		}
		start += bytes;
		bytes = 0;

		if (fatal_signal_pending(current)) {
			ret = -ERESTARTSYS;
			break;
		}

		cond_resched();
	}

	return ret;
}
2414 2415 2416 2417 2418 2419 2420 2421 2422 2423 2424 2425 2426 2427 2428 2429 2430 2431 2432 2433 2434 2435 2436 2437 2438 2439 2440 2441 2442 2443 2444 2445 2446 2447 2448 2449 2450 2451 2452 2453 2454 2455 2456 2457 2458 2459 2460 2461 2462 2463

/*
 * Find the left-most item in the cache tree, and then return the
 * smallest inode number in the item.
 *
 * Note: the returned inode number may not be the smallest one in
 * the tree, if the left-most item is a bitmap.
 */
u64 btrfs_find_ino_for_alloc(struct btrfs_root *fs_root)
{
	struct btrfs_free_space_ctl *ctl = fs_root->free_ino_ctl;
	struct btrfs_free_space *entry = NULL;
	u64 ino = 0;

	spin_lock(&ctl->tree_lock);

	if (RB_EMPTY_ROOT(&ctl->free_space_offset))
		goto out;

	entry = rb_entry(rb_first(&ctl->free_space_offset),
			 struct btrfs_free_space, offset_index);

	if (!entry->bitmap) {
		ino = entry->offset;

		unlink_free_space(ctl, entry);
		entry->offset++;
		entry->bytes--;
		if (!entry->bytes)
			kmem_cache_free(btrfs_free_space_cachep, entry);
		else
			link_free_space(ctl, entry);
	} else {
		u64 offset = 0;
		u64 count = 1;
		int ret;

		ret = search_bitmap(ctl, entry, &offset, &count);
		BUG_ON(ret);

		ino = offset;
		bitmap_clear_bits(ctl, entry, offset, 1);
		if (entry->bytes == 0)
			free_bitmap(ctl, entry);
	}
out:
	spin_unlock(&ctl->tree_lock);

	return ino;
}
2464 2465 2466 2467 2468 2469 2470 2471 2472 2473 2474 2475 2476 2477 2478 2479 2480 2481 2482 2483 2484 2485 2486 2487 2488 2489 2490 2491 2492 2493 2494 2495 2496 2497 2498 2499 2500 2501 2502 2503 2504 2505 2506 2507 2508 2509 2510 2511 2512 2513 2514 2515 2516 2517 2518 2519 2520 2521 2522 2523 2524 2525 2526 2527 2528 2529 2530 2531 2532 2533 2534 2535 2536 2537 2538 2539 2540 2541 2542 2543 2544 2545 2546 2547 2548 2549 2550 2551 2552 2553 2554 2555

struct inode *lookup_free_ino_inode(struct btrfs_root *root,
				    struct btrfs_path *path)
{
	struct inode *inode = NULL;

	spin_lock(&root->cache_lock);
	if (root->cache_inode)
		inode = igrab(root->cache_inode);
	spin_unlock(&root->cache_lock);
	if (inode)
		return inode;

	inode = __lookup_free_space_inode(root, path, 0);
	if (IS_ERR(inode))
		return inode;

	spin_lock(&root->cache_lock);
	if (!root->fs_info->closing)
		root->cache_inode = igrab(inode);
	spin_unlock(&root->cache_lock);

	return inode;
}

int create_free_ino_inode(struct btrfs_root *root,
			  struct btrfs_trans_handle *trans,
			  struct btrfs_path *path)
{
	return __create_free_space_inode(root, trans, path,
					 BTRFS_FREE_INO_OBJECTID, 0);
}

int load_free_ino_cache(struct btrfs_fs_info *fs_info, struct btrfs_root *root)
{
	struct btrfs_free_space_ctl *ctl = root->free_ino_ctl;
	struct btrfs_path *path;
	struct inode *inode;
	int ret = 0;
	u64 root_gen = btrfs_root_generation(&root->root_item);

	/*
	 * If we're unmounting then just return, since this does a search on the
	 * normal root and not the commit root and we could deadlock.
	 */
	smp_mb();
	if (fs_info->closing)
		return 0;

	path = btrfs_alloc_path();
	if (!path)
		return 0;

	inode = lookup_free_ino_inode(root, path);
	if (IS_ERR(inode))
		goto out;

	if (root_gen != BTRFS_I(inode)->generation)
		goto out_put;

	ret = __load_free_space_cache(root, inode, ctl, path, 0);

	if (ret < 0)
		printk(KERN_ERR "btrfs: failed to load free ino cache for "
		       "root %llu\n", root->root_key.objectid);
out_put:
	iput(inode);
out:
	btrfs_free_path(path);
	return ret;
}

int btrfs_write_out_ino_cache(struct btrfs_root *root,
			      struct btrfs_trans_handle *trans,
			      struct btrfs_path *path)
{
	struct btrfs_free_space_ctl *ctl = root->free_ino_ctl;
	struct inode *inode;
	int ret;

	inode = lookup_free_ino_inode(root, path);
	if (IS_ERR(inode))
		return 0;

	ret = __btrfs_write_out_cache(root, inode, ctl, NULL, trans, path, 0);
	if (ret < 0)
		printk(KERN_ERR "btrfs: failed to write free ino cache "
		       "for root %llu\n", root->root_key.objectid);

	iput(inode);
	return ret;
}