free-space-cache.c 63.2 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
	key.type = 0;

	ret = btrfs_search_slot(NULL, root, &key, path, 0, 0);
	if (ret < 0)
		return ERR_PTR(ret);
	if (ret > 0) {
56
		btrfs_release_path(path);
57 58 59 60 61 62 63 64
		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);
65
	btrfs_release_path(path);
66 67 68 69 70 71 72 73 74 75 76

	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
	btrfs_mark_buffer_dirty(leaf);
143
	btrfs_release_path(path);
144 145

	key.objectid = BTRFS_FREE_SPACE_OBJECTID;
146
	key.offset = offset;
147 148 149 150 151
	key.type = 0;

	ret = btrfs_insert_empty_item(trans, root, path, &key,
				      sizeof(struct btrfs_free_space_header));
	if (ret < 0) {
152
		btrfs_release_path(path);
153 154 155 156 157 158 159 160
		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);
161
	btrfs_release_path(path);
162 163 164 165

	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
	if (ret < 0)
		goto out;
	else if (ret > 0) {
269
		btrfs_release_path(path);
270
		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(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 410 411 412
				if (ret) {
					printk(KERN_ERR "Duplicate entries in "
					       "free space cache, dumping\n");
					kunmap(page);
					unlock_page(page);
					page_cache_release(page);
					goto free_cache;
				}
413 414 415 416
			} else {
				e->bitmap = kzalloc(PAGE_CACHE_SIZE, GFP_NOFS);
				if (!e->bitmap) {
					kunmap(page);
417 418
					kmem_cache_free(
						btrfs_free_space_cachep, e);
419 420 421 422
					unlock_page(page);
					page_cache_release(page);
					goto free_cache;
				}
423
				spin_lock(&ctl->tree_lock);
424
				ret2 = link_free_space(ctl, e);
425 426 427
				ctl->total_bitmaps++;
				ctl->op->recalc_thresholds(ctl);
				spin_unlock(&ctl->tree_lock);
428
				list_add_tail(&e->list, &bitmaps);
429 430 431 432 433 434 435 436
				if (ret) {
					printk(KERN_ERR "Duplicate entries in "
					       "free space cache, dumping\n");
					kunmap(page);
					unlock_page(page);
					page_cache_release(page);
					goto free_cache;
				}
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 462 463 464 465 466 467 468 469 470 471 472 473 474 475 476
			}

			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:
477
	__btrfs_remove_free_space_cache(ctl);
478 479 480
	goto out;
}

481 482
int load_free_space_cache(struct btrfs_fs_info *fs_info,
			  struct btrfs_block_group_cache *block_group)
J
Josef Bacik 已提交
483
{
484
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
485 486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503
	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.
	 */
504
	spin_lock(&block_group->lock);
505 506 507 508
	if (block_group->disk_cache_state != BTRFS_DC_WRITTEN) {
		spin_unlock(&block_group->lock);
		return 0;
	}
509
	spin_unlock(&block_group->lock);
510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536 537 538 539 540 541 542 543

	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);
544
		ret = 0;
545 546 547 548 549 550 551

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

	iput(inode);
	return ret;
552 553
}

554 555 556 557 558
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 已提交
559 560 561 562 563
{
	struct btrfs_free_space_header *header;
	struct extent_buffer *leaf;
	struct rb_node *node;
	struct list_head *pos, *n;
564
	struct page **pages;
J
Josef Bacik 已提交
565 566
	struct page *page;
	struct extent_state *cached_state = NULL;
567 568
	struct btrfs_free_cluster *cluster = NULL;
	struct extent_io_tree *unpin = NULL;
J
Josef Bacik 已提交
569 570
	struct list_head bitmap_list;
	struct btrfs_key key;
571
	u64 start, end, len;
J
Josef Bacik 已提交
572 573 574
	u64 bytes = 0;
	u32 *crc, *checksums;
	unsigned long first_page_offset;
575
	int index = 0, num_pages = 0;
J
Josef Bacik 已提交
576 577
	int entries = 0;
	int bitmaps = 0;
578
	int ret = -1;
579
	bool next_page = false;
580
	bool out_of_space = false;
J
Josef Bacik 已提交
581 582 583

	INIT_LIST_HEAD(&bitmap_list);

584
	node = rb_first(&ctl->free_space_offset);
585
	if (!node)
J
Josef Bacik 已提交
586 587
		return 0;

588 589
	if (!i_size_read(inode))
		return -1;
590

591 592
	num_pages = (i_size_read(inode) + PAGE_CACHE_SIZE - 1) >>
		PAGE_CACHE_SHIFT;
J
Josef Bacik 已提交
593 594 595 596 597
	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. */
598
	crc = checksums = kzalloc(sizeof(u32) * num_pages, GFP_NOFS);
599 600
	if (!crc)
		return -1;
J
Josef Bacik 已提交
601

602 603 604
	pages = kzalloc(sizeof(struct page *) * num_pages, GFP_NOFS);
	if (!pages) {
		kfree(crc);
605
		return -1;
606 607
	}

J
Josef Bacik 已提交
608 609 610 611
	/* 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.
	 */
612
	first_page_offset = (sizeof(u32) * num_pages) + sizeof(u64);
J
Josef Bacik 已提交
613

614
	/* Get the cluster for this block_group if it exists */
615
	if (block_group && !list_empty(&block_group->cluster_list))
616 617 618 619 620 621 622 623 624 625
		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 已提交
626 627 628 629 630 631 632 633
	/*
	 * 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.
	 */
634
	while (index < num_pages) {
J
Josef Bacik 已提交
635 636
		page = grab_cache_page(inode->i_mapping, index);
		if (!page) {
637
			int i;
J
Josef Bacik 已提交
638

639 640 641
			for (i = 0; i < num_pages; i++) {
				unlock_page(pages[i]);
				page_cache_release(pages[i]);
J
Josef Bacik 已提交
642 643 644
			}
			goto out_free;
		}
645
		pages[index] = page;
J
Josef Bacik 已提交
646 647 648 649 650 651 652
		index++;
	}

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

653 654 655 656
	/*
	 * When searching for pinned extents, we need to start at our start
	 * offset.
	 */
657 658
	if (block_group)
		start = block_group->key.objectid;
659

J
Josef Bacik 已提交
660 661 662 663 664 665 666
	/* Write out the extent entries */
	do {
		struct btrfs_free_space_entry *entry;
		void *addr;
		unsigned long offset = 0;
		unsigned long start_offset = 0;

667 668
		next_page = false;

J
Josef Bacik 已提交
669 670 671 672 673
		if (index == 0) {
			start_offset = first_page_offset;
			offset = start_offset;
		}

674 675 676 677 678 679
		if (index >= num_pages) {
			out_of_space = true;
			break;
		}

		page = pages[index];
J
Josef Bacik 已提交
680 681 682 683 684

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

		memset(addr, 0, PAGE_CACHE_SIZE);
685
		while (node && !next_page) {
J
Josef Bacik 已提交
686 687 688 689 690 691 692 693 694 695 696 697 698 699 700
			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);
701 702 703 704
			if (!node && cluster) {
				node = rb_first(&cluster->root);
				cluster = NULL;
			}
J
Josef Bacik 已提交
705 706 707
			offset += sizeof(struct btrfs_free_space_entry);
			if (offset + sizeof(struct btrfs_free_space_entry) >=
			    PAGE_CACHE_SIZE)
708 709 710 711 712 713 714 715
				next_page = true;
			entry++;
		}

		/*
		 * We want to add any pinned extents to our free space cache
		 * so we don't leak the space
		 */
716 717 718
		while (block_group && !next_page &&
		       (start < block_group->key.objectid +
			block_group->key.offset)) {
719 720 721 722 723 724 725 726 727 728
			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 已提交
729
				break;
730 731 732 733 734 735 736 737 738 739 740 741 742 743 744

			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 已提交
745 746 747 748 749 750 751 752 753 754 755 756 757
			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++;
758
	} while (node || next_page);
J
Josef Bacik 已提交
759 760 761 762 763 764 765

	/* 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);

766 767 768 769
		if (index >= num_pages) {
			out_of_space = true;
			break;
		}
C
Chris Mason 已提交
770
		page = pages[index];
J
Josef Bacik 已提交
771 772 773 774 775 776 777 778 779 780 781 782 783 784

		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++;
	}

785 786 787 788 789 790 791 792 793
	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 已提交
794
	/* Zero out the rest of the pages just to make sure */
795
	while (index < num_pages) {
J
Josef Bacik 已提交
796 797
		void *addr;

798
		page = pages[index];
J
Josef Bacik 已提交
799 800 801 802 803 804 805 806 807 808 809 810
		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;

811
		page = pages[0];
J
Josef Bacik 已提交
812 813

		addr = kmap(page);
814 815
		memcpy(addr, checksums, sizeof(u32) * num_pages);
		gen = addr + (sizeof(u32) * num_pages);
J
Josef Bacik 已提交
816 817 818 819
		*gen = trans->transid;
		kunmap(page);
	}

820 821 822
	ret = btrfs_dirty_pages(root, inode, pages, num_pages, 0,
					    bytes, &cached_state);
	btrfs_drop_pages(pages, num_pages);
J
Josef Bacik 已提交
823 824 825
	unlock_extent_cached(&BTRFS_I(inode)->io_tree, 0,
			     i_size_read(inode) - 1, &cached_state, GFP_NOFS);

826 827 828 829 830 831 832
	if (ret) {
		ret = 0;
		goto out_free;
	}

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

J
Josef Bacik 已提交
833 834 835
	filemap_write_and_wait(inode->i_mapping);

	key.objectid = BTRFS_FREE_SPACE_OBJECTID;
836
	key.offset = offset;
J
Josef Bacik 已提交
837 838 839 840
	key.type = 0;

	ret = btrfs_search_slot(trans, root, &key, path, 1, 1);
	if (ret < 0) {
841
		ret = -1;
J
Josef Bacik 已提交
842 843 844 845 846 847 848 849 850 851 852 853
		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 ||
854 855
		    found_key.offset != offset) {
			ret = -1;
J
Josef Bacik 已提交
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);
860
			btrfs_release_path(path);
J
Josef Bacik 已提交
861 862 863 864 865 866 867 868 869
			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);
870
	btrfs_release_path(path);
J
Josef Bacik 已提交
871 872 873 874

	ret = 1;

out_free:
875
	if (ret != 1) {
J
Josef Bacik 已提交
876 877 878 879
		invalidate_inode_pages2_range(inode->i_mapping, 0, index);
		BTRFS_I(inode)->generation = 0;
	}
	kfree(checksums);
880
	kfree(pages);
J
Josef Bacik 已提交
881
	btrfs_update_inode(trans, root, inode);
882 883 884 885 886 887 888 889 890 891 892 893 894 895 896 897 898 899 900 901 902 903 904 905 906 907 908 909 910 911 912
	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);
913
		ret = 0;
914 915 916 917 918

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

J
Josef Bacik 已提交
919 920 921 922
	iput(inode);
	return ret;
}

923
static inline unsigned long offset_to_bit(u64 bitmap_start, u32 unit,
924
					  u64 offset)
J
Josef Bacik 已提交
925
{
926 927
	BUG_ON(offset < bitmap_start);
	offset -= bitmap_start;
928
	return (unsigned long)(div_u64(offset, unit));
929
}
J
Josef Bacik 已提交
930

931
static inline unsigned long bytes_to_bits(u64 bytes, u32 unit)
932
{
933
	return (unsigned long)(div_u64(bytes, unit));
934
}
J
Josef Bacik 已提交
935

936
static inline u64 offset_to_bitmap(struct btrfs_free_space_ctl *ctl,
937 938 939 940
				   u64 offset)
{
	u64 bitmap_start;
	u64 bytes_per_bitmap;
J
Josef Bacik 已提交
941

942 943
	bytes_per_bitmap = BITS_PER_BITMAP * ctl->unit;
	bitmap_start = offset - ctl->start;
944 945
	bitmap_start = div64_u64(bitmap_start, bytes_per_bitmap);
	bitmap_start *= bytes_per_bitmap;
946
	bitmap_start += ctl->start;
J
Josef Bacik 已提交
947

948
	return bitmap_start;
J
Josef Bacik 已提交
949 950
}

951 952
static int tree_insert_offset(struct rb_root *root, u64 offset,
			      struct rb_node *node, int bitmap)
J
Josef Bacik 已提交
953 954 955 956 957 958 959
{
	struct rb_node **p = &root->rb_node;
	struct rb_node *parent = NULL;
	struct btrfs_free_space *info;

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

962
		if (offset < info->offset) {
J
Josef Bacik 已提交
963
			p = &(*p)->rb_left;
964
		} else if (offset > info->offset) {
J
Josef Bacik 已提交
965
			p = &(*p)->rb_right;
966 967 968 969 970 971 972 973 974 975 976 977 978 979 980
		} 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) {
981 982 983 984
				if (info->bitmap) {
					WARN_ON_ONCE(1);
					return -EEXIST;
				}
985 986
				p = &(*p)->rb_right;
			} else {
987 988 989 990
				if (!info->bitmap) {
					WARN_ON_ONCE(1);
					return -EEXIST;
				}
991 992 993
				p = &(*p)->rb_left;
			}
		}
J
Josef Bacik 已提交
994 995 996 997 998 999 1000 1001 1002
	}

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

	return 0;
}

/*
J
Josef Bacik 已提交
1003 1004
 * searches the tree for the given offset.
 *
1005 1006 1007
 * 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 已提交
1008
 */
1009
static struct btrfs_free_space *
1010
tree_search_offset(struct btrfs_free_space_ctl *ctl,
1011
		   u64 offset, int bitmap_only, int fuzzy)
J
Josef Bacik 已提交
1012
{
1013
	struct rb_node *n = ctl->free_space_offset.rb_node;
1014 1015 1016 1017 1018 1019 1020 1021
	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 已提交
1022 1023

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

1026
		if (offset < entry->offset)
J
Josef Bacik 已提交
1027
			n = n->rb_left;
1028
		else if (offset > entry->offset)
J
Josef Bacik 已提交
1029
			n = n->rb_right;
1030
		else
J
Josef Bacik 已提交
1031 1032 1033
			break;
	}

1034 1035 1036 1037 1038
	if (bitmap_only) {
		if (!entry)
			return NULL;
		if (entry->bitmap)
			return entry;
J
Josef Bacik 已提交
1039

1040 1041 1042 1043 1044 1045 1046 1047 1048 1049
		/*
		 * 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 已提交
1050

1051 1052 1053 1054
		WARN_ON(!entry->bitmap);
		return entry;
	} else if (entry) {
		if (entry->bitmap) {
J
Josef Bacik 已提交
1055
			/*
1056 1057
			 * if previous extent entry covers the offset,
			 * we should return it instead of the bitmap entry
J
Josef Bacik 已提交
1058
			 */
1059 1060 1061 1062 1063 1064 1065 1066 1067 1068 1069 1070
			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 已提交
1071
			}
1072 1073 1074 1075 1076 1077 1078 1079 1080 1081 1082 1083 1084 1085 1086
		}
		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 已提交
1087
		} else {
1088 1089 1090 1091
			if (fuzzy)
				return entry;
			else
				return NULL;
J
Josef Bacik 已提交
1092 1093 1094
		}
	}

1095 1096 1097 1098 1099 1100 1101 1102 1103 1104 1105 1106 1107 1108
	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;
			}
		}
1109
		if (entry->offset + BITS_PER_BITMAP * ctl->unit > offset)
1110 1111 1112 1113 1114 1115 1116 1117 1118 1119
			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 *
1120
			    ctl->unit > offset)
1121 1122 1123 1124 1125 1126 1127 1128 1129 1130 1131 1132
				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 已提交
1133 1134
}

1135
static inline void
1136
__unlink_free_space(struct btrfs_free_space_ctl *ctl,
1137
		    struct btrfs_free_space *info)
J
Josef Bacik 已提交
1138
{
1139 1140
	rb_erase(&info->offset_index, &ctl->free_space_offset);
	ctl->free_extents--;
1141 1142
}

1143
static void unlink_free_space(struct btrfs_free_space_ctl *ctl,
1144 1145
			      struct btrfs_free_space *info)
{
1146 1147
	__unlink_free_space(ctl, info);
	ctl->free_space -= info->bytes;
J
Josef Bacik 已提交
1148 1149
}

1150
static int link_free_space(struct btrfs_free_space_ctl *ctl,
J
Josef Bacik 已提交
1151 1152 1153 1154
			   struct btrfs_free_space *info)
{
	int ret = 0;

1155
	BUG_ON(!info->bitmap && !info->bytes);
1156
	ret = tree_insert_offset(&ctl->free_space_offset, info->offset,
1157
				 &info->offset_index, (info->bitmap != NULL));
J
Josef Bacik 已提交
1158 1159 1160
	if (ret)
		return ret;

1161 1162
	ctl->free_space += info->bytes;
	ctl->free_extents++;
1163 1164 1165
	return ret;
}

1166
static void recalculate_thresholds(struct btrfs_free_space_ctl *ctl)
1167
{
1168
	struct btrfs_block_group_cache *block_group = ctl->private;
1169 1170 1171
	u64 max_bytes;
	u64 bitmap_bytes;
	u64 extent_bytes;
1172
	u64 size = block_group->key.offset;
1173 1174 1175 1176
	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);
1177 1178 1179 1180 1181 1182

	/*
	 * 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
	 */
1183 1184 1185 1186 1187
	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);
1188

1189 1190 1191 1192 1193
	/*
	 * 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.
	 */
1194
	bitmap_bytes = (ctl->total_bitmaps + 1) * PAGE_CACHE_SIZE;
1195

1196
	if (bitmap_bytes >= max_bytes) {
1197
		ctl->extents_thresh = 0;
1198 1199
		return;
	}
1200

1201 1202 1203 1204 1205 1206
	/*
	 * 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));
1207

1208
	ctl->extents_thresh =
1209
		div64_u64(extent_bytes, (sizeof(struct btrfs_free_space)));
1210 1211
}

1212
static void bitmap_clear_bits(struct btrfs_free_space_ctl *ctl,
J
Josef Bacik 已提交
1213 1214
			      struct btrfs_free_space *info, u64 offset,
			      u64 bytes)
1215
{
L
Li Zefan 已提交
1216
	unsigned long start, count;
1217

1218 1219
	start = offset_to_bit(info->offset, ctl->unit, offset);
	count = bytes_to_bits(bytes, ctl->unit);
L
Li Zefan 已提交
1220
	BUG_ON(start + count > BITS_PER_BITMAP);
1221

L
Li Zefan 已提交
1222
	bitmap_clear(info->bitmap, start, count);
1223 1224

	info->bytes -= bytes;
1225
	ctl->free_space -= bytes;
1226 1227
}

1228
static void bitmap_set_bits(struct btrfs_free_space_ctl *ctl,
J
Josef Bacik 已提交
1229 1230
			    struct btrfs_free_space *info, u64 offset,
			    u64 bytes)
1231
{
L
Li Zefan 已提交
1232
	unsigned long start, count;
1233

1234 1235
	start = offset_to_bit(info->offset, ctl->unit, offset);
	count = bytes_to_bits(bytes, ctl->unit);
L
Li Zefan 已提交
1236
	BUG_ON(start + count > BITS_PER_BITMAP);
1237

L
Li Zefan 已提交
1238
	bitmap_set(info->bitmap, start, count);
1239 1240

	info->bytes += bytes;
1241
	ctl->free_space += bytes;
1242 1243
}

1244
static int search_bitmap(struct btrfs_free_space_ctl *ctl,
1245 1246 1247 1248 1249 1250 1251
			 struct btrfs_free_space *bitmap_info, u64 *offset,
			 u64 *bytes)
{
	unsigned long found_bits = 0;
	unsigned long bits, i;
	unsigned long next_zero;

1252
	i = offset_to_bit(bitmap_info->offset, ctl->unit,
1253
			  max_t(u64, *offset, bitmap_info->offset));
1254
	bits = bytes_to_bits(*bytes, ctl->unit);
1255 1256 1257 1258 1259 1260 1261 1262 1263 1264 1265 1266 1267 1268

	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) {
1269 1270
		*offset = (u64)(i * ctl->unit) + bitmap_info->offset;
		*bytes = (u64)(found_bits) * ctl->unit;
1271 1272 1273 1274 1275 1276
		return 0;
	}

	return -1;
}

1277 1278
static struct btrfs_free_space *
find_free_space(struct btrfs_free_space_ctl *ctl, u64 *offset, u64 *bytes)
1279 1280 1281 1282 1283
{
	struct btrfs_free_space *entry;
	struct rb_node *node;
	int ret;

1284
	if (!ctl->free_space_offset.rb_node)
1285 1286
		return NULL;

1287
	entry = tree_search_offset(ctl, offset_to_bitmap(ctl, *offset), 0, 1);
1288 1289 1290 1291 1292 1293 1294 1295 1296
	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) {
1297
			ret = search_bitmap(ctl, entry, offset, bytes);
1298 1299 1300 1301 1302 1303 1304 1305 1306 1307 1308 1309 1310
			if (!ret)
				return entry;
			continue;
		}

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

	return NULL;
}

1311
static void add_new_bitmap(struct btrfs_free_space_ctl *ctl,
1312 1313
			   struct btrfs_free_space *info, u64 offset)
{
1314
	info->offset = offset_to_bitmap(ctl, offset);
J
Josef Bacik 已提交
1315
	info->bytes = 0;
1316 1317
	link_free_space(ctl, info);
	ctl->total_bitmaps++;
1318

1319
	ctl->op->recalc_thresholds(ctl);
1320 1321
}

1322
static void free_bitmap(struct btrfs_free_space_ctl *ctl,
1323 1324
			struct btrfs_free_space *bitmap_info)
{
1325
	unlink_free_space(ctl, bitmap_info);
1326
	kfree(bitmap_info->bitmap);
1327
	kmem_cache_free(btrfs_free_space_cachep, bitmap_info);
1328 1329
	ctl->total_bitmaps--;
	ctl->op->recalc_thresholds(ctl);
1330 1331
}

1332
static noinline int remove_from_bitmap(struct btrfs_free_space_ctl *ctl,
1333 1334 1335 1336
			      struct btrfs_free_space *bitmap_info,
			      u64 *offset, u64 *bytes)
{
	u64 end;
1337 1338
	u64 search_start, search_bytes;
	int ret;
1339 1340

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

1343 1344 1345 1346 1347 1348 1349 1350 1351 1352 1353 1354
	/*
	 * 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;
1355
	search_bytes = min(search_bytes, end - search_start + 1);
1356
	ret = search_bitmap(ctl, bitmap_info, &search_start, &search_bytes);
1357 1358
	BUG_ON(ret < 0 || search_start != *offset);

1359
	if (*offset > bitmap_info->offset && *offset + *bytes > end) {
1360
		bitmap_clear_bits(ctl, bitmap_info, *offset, end - *offset + 1);
1361 1362 1363
		*bytes -= end - *offset + 1;
		*offset = end + 1;
	} else if (*offset >= bitmap_info->offset && *offset + *bytes <= end) {
1364
		bitmap_clear_bits(ctl, bitmap_info, *offset, *bytes);
1365 1366 1367 1368
		*bytes = 0;
	}

	if (*bytes) {
1369
		struct rb_node *next = rb_next(&bitmap_info->offset_index);
1370
		if (!bitmap_info->bytes)
1371
			free_bitmap(ctl, bitmap_info);
1372

1373 1374 1375 1376 1377
		/*
		 * no entry after this bitmap, but we still have bytes to
		 * remove, so something has gone wrong.
		 */
		if (!next)
1378 1379
			return -EINVAL;

1380 1381 1382 1383 1384 1385 1386
		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.
		 */
1387 1388 1389
		if (!bitmap_info->bitmap)
			return -EAGAIN;

1390 1391 1392 1393 1394 1395 1396 1397
		/*
		 * 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;
1398
		ret = search_bitmap(ctl, bitmap_info, &search_start,
1399 1400 1401 1402
				    &search_bytes);
		if (ret < 0 || search_start != *offset)
			return -EAGAIN;

1403
		goto again;
1404
	} else if (!bitmap_info->bytes)
1405
		free_bitmap(ctl, bitmap_info);
1406 1407 1408 1409

	return 0;
}

1410 1411
static bool use_bitmap(struct btrfs_free_space_ctl *ctl,
		      struct btrfs_free_space *info)
1412
{
1413
	struct btrfs_block_group_cache *block_group = ctl->private;
1414 1415 1416 1417 1418

	/*
	 * If we are below the extents threshold then we can add this as an
	 * extent, and don't have to deal with the bitmap
	 */
1419
	if (ctl->free_extents < ctl->extents_thresh) {
1420 1421 1422 1423 1424 1425 1426 1427
		/*
		 * 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) {
1428 1429
			if (ctl->free_extents * 2 <= ctl->extents_thresh)
				return false;
1430
		} else {
1431
			return false;
1432 1433
		}
	}
1434 1435 1436 1437 1438 1439 1440

	/*
	 * 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)
1441 1442 1443 1444 1445 1446 1447 1448 1449 1450 1451 1452
		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;
1453 1454 1455 1456

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

1457 1458 1459
	if (!ctl->op->use_bitmap(ctl, info))
		return 0;

1460
again:
1461
	bitmap_info = tree_search_offset(ctl, offset_to_bitmap(ctl, offset),
1462 1463 1464 1465 1466 1467
					 1, 0);
	if (!bitmap_info) {
		BUG_ON(added);
		goto new_bitmap;
	}

1468
	end = bitmap_info->offset + (u64)(BITS_PER_BITMAP * ctl->unit);
1469 1470

	if (offset >= bitmap_info->offset && offset + bytes > end) {
1471
		bitmap_set_bits(ctl, bitmap_info, offset, end - offset);
1472 1473 1474 1475
		bytes -= end - offset;
		offset = end;
		added = 0;
	} else if (offset >= bitmap_info->offset && offset + bytes <= end) {
1476
		bitmap_set_bits(ctl, bitmap_info, offset, bytes);
1477 1478 1479 1480 1481 1482 1483 1484 1485 1486 1487 1488 1489
		bytes = 0;
	} else {
		BUG();
	}

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

new_bitmap:
	if (info && info->bitmap) {
1490
		add_new_bitmap(ctl, info, offset);
1491 1492 1493 1494
		added = 1;
		info = NULL;
		goto again;
	} else {
1495
		spin_unlock(&ctl->tree_lock);
1496 1497 1498

		/* no pre-allocated info, allocate a new one */
		if (!info) {
1499 1500
			info = kmem_cache_zalloc(btrfs_free_space_cachep,
						 GFP_NOFS);
1501
			if (!info) {
1502
				spin_lock(&ctl->tree_lock);
1503 1504 1505 1506 1507 1508 1509
				ret = -ENOMEM;
				goto out;
			}
		}

		/* allocate the bitmap */
		info->bitmap = kzalloc(PAGE_CACHE_SIZE, GFP_NOFS);
1510
		spin_lock(&ctl->tree_lock);
1511 1512 1513 1514 1515 1516 1517 1518 1519 1520 1521
		if (!info->bitmap) {
			ret = -ENOMEM;
			goto out;
		}
		goto again;
	}

out:
	if (info) {
		if (info->bitmap)
			kfree(info->bitmap);
1522
		kmem_cache_free(btrfs_free_space_cachep, info);
1523
	}
J
Josef Bacik 已提交
1524 1525 1526 1527

	return ret;
}

1528
static bool try_merge_free_space(struct btrfs_free_space_ctl *ctl,
1529
			  struct btrfs_free_space *info, bool update_stat)
J
Josef Bacik 已提交
1530
{
1531 1532 1533 1534 1535
	struct btrfs_free_space *left_info;
	struct btrfs_free_space *right_info;
	bool merged = false;
	u64 offset = info->offset;
	u64 bytes = info->bytes;
1536

J
Josef Bacik 已提交
1537 1538 1539 1540 1541
	/*
	 * 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
	 */
1542
	right_info = tree_search_offset(ctl, offset + bytes, 0, 0);
1543 1544 1545 1546
	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
1547
		left_info = tree_search_offset(ctl, offset - 1, 0, 0);
J
Josef Bacik 已提交
1548

1549
	if (right_info && !right_info->bitmap) {
1550
		if (update_stat)
1551
			unlink_free_space(ctl, right_info);
1552
		else
1553
			__unlink_free_space(ctl, right_info);
1554
		info->bytes += right_info->bytes;
1555
		kmem_cache_free(btrfs_free_space_cachep, right_info);
1556
		merged = true;
J
Josef Bacik 已提交
1557 1558
	}

1559 1560
	if (left_info && !left_info->bitmap &&
	    left_info->offset + left_info->bytes == offset) {
1561
		if (update_stat)
1562
			unlink_free_space(ctl, left_info);
1563
		else
1564
			__unlink_free_space(ctl, left_info);
1565 1566
		info->offset = left_info->offset;
		info->bytes += left_info->bytes;
1567
		kmem_cache_free(btrfs_free_space_cachep, left_info);
1568
		merged = true;
J
Josef Bacik 已提交
1569 1570
	}

1571 1572 1573
	return merged;
}

1574 1575
int __btrfs_add_free_space(struct btrfs_free_space_ctl *ctl,
			   u64 offset, u64 bytes)
1576 1577 1578 1579
{
	struct btrfs_free_space *info;
	int ret = 0;

1580
	info = kmem_cache_zalloc(btrfs_free_space_cachep, GFP_NOFS);
1581 1582 1583 1584 1585 1586
	if (!info)
		return -ENOMEM;

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

1587
	spin_lock(&ctl->tree_lock);
1588

1589
	if (try_merge_free_space(ctl, info, true))
1590 1591 1592 1593 1594 1595 1596
		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
	 */
1597
	ret = insert_into_bitmap(ctl, info);
1598 1599 1600 1601 1602 1603 1604
	if (ret < 0) {
		goto out;
	} else if (ret) {
		ret = 0;
		goto out;
	}
link:
1605
	ret = link_free_space(ctl, info);
J
Josef Bacik 已提交
1606
	if (ret)
1607
		kmem_cache_free(btrfs_free_space_cachep, info);
1608
out:
1609
	spin_unlock(&ctl->tree_lock);
1610

J
Josef Bacik 已提交
1611
	if (ret) {
1612
		printk(KERN_CRIT "btrfs: unable to add free space :%d\n", ret);
S
Stoyan Gaydarov 已提交
1613
		BUG_ON(ret == -EEXIST);
J
Josef Bacik 已提交
1614 1615 1616 1617 1618
	}

	return ret;
}

1619 1620
int btrfs_remove_free_space(struct btrfs_block_group_cache *block_group,
			    u64 offset, u64 bytes)
J
Josef Bacik 已提交
1621
{
1622
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
J
Josef Bacik 已提交
1623
	struct btrfs_free_space *info;
1624
	struct btrfs_free_space *next_info = NULL;
J
Josef Bacik 已提交
1625 1626
	int ret = 0;

1627
	spin_lock(&ctl->tree_lock);
1628

1629
again:
1630
	info = tree_search_offset(ctl, offset, 0, 0);
1631
	if (!info) {
1632 1633 1634 1635
		/*
		 * oops didn't find an extent that matched the space we wanted
		 * to remove, look for a bitmap instead
		 */
1636
		info = tree_search_offset(ctl, offset_to_bitmap(ctl, offset),
1637 1638 1639 1640 1641
					  1, 0);
		if (!info) {
			WARN_ON(1);
			goto out_lock;
		}
1642 1643 1644 1645 1646 1647 1648 1649 1650
	}

	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)
1651 1652
			end = next_info->offset +
			      BITS_PER_BITMAP * ctl->unit - 1;
1653 1654 1655 1656 1657 1658 1659 1660 1661 1662
		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 已提交
1663 1664
			WARN_ON(1);
			ret = -EINVAL;
1665
			goto out_lock;
J
Josef Bacik 已提交
1666 1667
		}

1668 1669 1670 1671
		info = next_info;
	}

	if (info->bytes == bytes) {
1672
		unlink_free_space(ctl, info);
1673 1674
		if (info->bitmap) {
			kfree(info->bitmap);
1675
			ctl->total_bitmaps--;
J
Josef Bacik 已提交
1676
		}
1677
		kmem_cache_free(btrfs_free_space_cachep, info);
1678 1679
		goto out_lock;
	}
J
Josef Bacik 已提交
1680

1681
	if (!info->bitmap && info->offset == offset) {
1682
		unlink_free_space(ctl, info);
J
Josef Bacik 已提交
1683 1684
		info->offset += bytes;
		info->bytes -= bytes;
1685
		link_free_space(ctl, info);
1686 1687
		goto out_lock;
	}
J
Josef Bacik 已提交
1688

1689 1690
	if (!info->bitmap && info->offset <= offset &&
	    info->offset + info->bytes >= offset + bytes) {
1691 1692 1693 1694 1695 1696 1697 1698
		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
		 */
1699
		unlink_free_space(ctl, info);
1700 1701 1702 1703 1704
		if (offset + bytes < info->offset + info->bytes) {
			u64 old_end = info->offset + info->bytes;

			info->offset = offset + bytes;
			info->bytes = old_end - info->offset;
1705
			ret = link_free_space(ctl, info);
1706 1707 1708
			WARN_ON(ret);
			if (ret)
				goto out_lock;
1709 1710 1711 1712
		} else {
			/* the hole we're creating ends at the end
			 * of the info struct, just free the info
			 */
1713
			kmem_cache_free(btrfs_free_space_cachep, info);
1714
		}
1715
		spin_unlock(&ctl->tree_lock);
1716 1717 1718

		/* step two, insert a new info struct to cover
		 * anything before the hole
1719
		 */
1720 1721
		ret = btrfs_add_free_space(block_group, old_start,
					   offset - old_start);
1722 1723
		WARN_ON(ret);
		goto out;
J
Josef Bacik 已提交
1724
	}
1725

1726
	ret = remove_from_bitmap(ctl, info, &offset, &bytes);
1727 1728 1729 1730
	if (ret == -EAGAIN)
		goto again;
	BUG_ON(ret);
out_lock:
1731
	spin_unlock(&ctl->tree_lock);
J
Josef Bacik 已提交
1732
out:
1733 1734 1735
	return ret;
}

J
Josef Bacik 已提交
1736 1737 1738
void btrfs_dump_free_space(struct btrfs_block_group_cache *block_group,
			   u64 bytes)
{
1739
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
J
Josef Bacik 已提交
1740 1741 1742 1743
	struct btrfs_free_space *info;
	struct rb_node *n;
	int count = 0;

1744
	for (n = rb_first(&ctl->free_space_offset); n; n = rb_next(n)) {
J
Josef Bacik 已提交
1745 1746 1747
		info = rb_entry(n, struct btrfs_free_space, offset_index);
		if (info->bytes >= bytes)
			count++;
1748
		printk(KERN_CRIT "entry offset %llu, bytes %llu, bitmap %s\n",
1749
		       (unsigned long long)info->offset,
1750 1751
		       (unsigned long long)info->bytes,
		       (info->bitmap) ? "yes" : "no");
J
Josef Bacik 已提交
1752
	}
1753 1754
	printk(KERN_INFO "block group has cluster?: %s\n",
	       list_empty(&block_group->cluster_list) ? "no" : "yes");
J
Josef Bacik 已提交
1755 1756 1757 1758
	printk(KERN_INFO "%d blocks of free space at or bigger than bytes is"
	       "\n", count);
}

1759 1760 1761 1762 1763 1764
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)
J
Josef Bacik 已提交
1765
{
1766
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
J
Josef Bacik 已提交
1767

1768 1769 1770 1771 1772
	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;
J
Josef Bacik 已提交
1773

1774 1775 1776 1777 1778 1779 1780
	/*
	 * 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);
J
Josef Bacik 已提交
1781 1782
}

1783 1784 1785 1786 1787 1788 1789 1790 1791 1792 1793
/*
 * 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)
{
1794
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
1795 1796 1797 1798 1799 1800 1801
	struct btrfs_free_space *entry;
	struct rb_node *node;

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

1802
	cluster->block_group = NULL;
1803
	cluster->window_start = 0;
1804 1805
	list_del_init(&cluster->block_group_list);

1806
	node = rb_first(&cluster->root);
1807
	while (node) {
1808 1809
		bool bitmap;

1810 1811 1812
		entry = rb_entry(node, struct btrfs_free_space, offset_index);
		node = rb_next(&entry->offset_index);
		rb_erase(&entry->offset_index, &cluster->root);
1813 1814 1815

		bitmap = (entry->bitmap != NULL);
		if (!bitmap)
1816 1817
			try_merge_free_space(ctl, entry, false);
		tree_insert_offset(&ctl->free_space_offset,
1818
				   entry->offset, &entry->offset_index, bitmap);
1819
	}
1820
	cluster->root = RB_ROOT;
1821

1822 1823
out:
	spin_unlock(&cluster->lock);
1824
	btrfs_put_block_group(block_group);
1825 1826 1827
	return 0;
}

1828
void __btrfs_remove_free_space_cache_locked(struct btrfs_free_space_ctl *ctl)
J
Josef Bacik 已提交
1829 1830 1831
{
	struct btrfs_free_space *info;
	struct rb_node *node;
1832 1833 1834 1835 1836 1837 1838 1839 1840 1841 1842 1843

	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);
		}
	}
1844 1845 1846 1847 1848 1849
}

void __btrfs_remove_free_space_cache(struct btrfs_free_space_ctl *ctl)
{
	spin_lock(&ctl->tree_lock);
	__btrfs_remove_free_space_cache_locked(ctl);
1850 1851 1852 1853 1854 1855
	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;
1856
	struct btrfs_free_cluster *cluster;
1857
	struct list_head *head;
J
Josef Bacik 已提交
1858

1859
	spin_lock(&ctl->tree_lock);
1860 1861 1862 1863
	while ((head = block_group->cluster_list.next) !=
	       &block_group->cluster_list) {
		cluster = list_entry(head, struct btrfs_free_cluster,
				     block_group_list);
1864 1865 1866

		WARN_ON(cluster->block_group != block_group);
		__btrfs_return_cluster_to_free_space(block_group, cluster);
1867
		if (need_resched()) {
1868
			spin_unlock(&ctl->tree_lock);
1869
			cond_resched();
1870
			spin_lock(&ctl->tree_lock);
1871
		}
1872
	}
1873
	__btrfs_remove_free_space_cache_locked(ctl);
1874
	spin_unlock(&ctl->tree_lock);
1875

J
Josef Bacik 已提交
1876 1877
}

1878 1879
u64 btrfs_find_space_for_alloc(struct btrfs_block_group_cache *block_group,
			       u64 offset, u64 bytes, u64 empty_size)
J
Josef Bacik 已提交
1880
{
1881
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
1882
	struct btrfs_free_space *entry = NULL;
1883
	u64 bytes_search = bytes + empty_size;
1884
	u64 ret = 0;
J
Josef Bacik 已提交
1885

1886 1887
	spin_lock(&ctl->tree_lock);
	entry = find_free_space(ctl, &offset, &bytes_search);
1888
	if (!entry)
1889 1890 1891 1892
		goto out;

	ret = offset;
	if (entry->bitmap) {
1893
		bitmap_clear_bits(ctl, entry, offset, bytes);
1894
		if (!entry->bytes)
1895
			free_bitmap(ctl, entry);
1896
	} else {
1897
		unlink_free_space(ctl, entry);
1898 1899 1900
		entry->offset += bytes;
		entry->bytes -= bytes;
		if (!entry->bytes)
1901
			kmem_cache_free(btrfs_free_space_cachep, entry);
1902
		else
1903
			link_free_space(ctl, entry);
1904
	}
J
Josef Bacik 已提交
1905

1906
out:
1907
	spin_unlock(&ctl->tree_lock);
J
Josef Bacik 已提交
1908

J
Josef Bacik 已提交
1909 1910
	return ret;
}
1911 1912 1913 1914 1915 1916 1917 1918 1919 1920 1921 1922 1923

/*
 * 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)
{
1924
	struct btrfs_free_space_ctl *ctl;
1925 1926 1927 1928 1929 1930 1931 1932 1933 1934 1935 1936 1937 1938 1939 1940 1941 1942
	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);

1943 1944
	ctl = block_group->free_space_ctl;

1945
	/* now return any extents the cluster had on it */
1946
	spin_lock(&ctl->tree_lock);
1947
	ret = __btrfs_return_cluster_to_free_space(block_group, cluster);
1948
	spin_unlock(&ctl->tree_lock);
1949 1950 1951 1952 1953 1954

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

1955 1956
static u64 btrfs_alloc_from_bitmap(struct btrfs_block_group_cache *block_group,
				   struct btrfs_free_cluster *cluster,
1957
				   struct btrfs_free_space *entry,
1958 1959
				   u64 bytes, u64 min_start)
{
1960
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
1961 1962 1963 1964 1965 1966 1967 1968
	int err;
	u64 search_start = cluster->window_start;
	u64 search_bytes = bytes;
	u64 ret = 0;

	search_start = min_start;
	search_bytes = bytes;

1969
	err = search_bitmap(ctl, entry, &search_start, &search_bytes);
1970
	if (err)
1971
		return 0;
1972 1973

	ret = search_start;
1974
	bitmap_clear_bits(ctl, entry, ret, bytes);
1975 1976 1977 1978

	return ret;
}

1979 1980 1981 1982 1983 1984 1985 1986 1987
/*
 * 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)
{
1988
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
1989 1990 1991 1992 1993 1994 1995 1996 1997 1998 1999 2000 2001 2002 2003 2004 2005
	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) {
2006 2007
		if (entry->bytes < bytes ||
		    (!entry->bitmap && entry->offset < min_start)) {
2008 2009 2010 2011 2012 2013 2014 2015
			node = rb_next(&entry->offset_index);
			if (!node)
				break;
			entry = rb_entry(node, struct btrfs_free_space,
					 offset_index);
			continue;
		}

2016 2017 2018 2019 2020 2021 2022 2023 2024 2025 2026 2027 2028 2029 2030 2031 2032 2033 2034
		if (entry->bitmap) {
			ret = btrfs_alloc_from_bitmap(block_group,
						      cluster, entry, bytes,
						      min_start);
			if (ret == 0) {
				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;
		}
2035

2036
		if (entry->bytes == 0)
2037 2038 2039 2040 2041
			rb_erase(&entry->offset_index, &cluster->root);
		break;
	}
out:
	spin_unlock(&cluster->lock);
2042

2043 2044 2045
	if (!ret)
		return 0;

2046
	spin_lock(&ctl->tree_lock);
2047

2048
	ctl->free_space -= bytes;
2049
	if (entry->bytes == 0) {
2050
		ctl->free_extents--;
2051 2052
		if (entry->bitmap) {
			kfree(entry->bitmap);
2053 2054
			ctl->total_bitmaps--;
			ctl->op->recalc_thresholds(ctl);
2055
		}
2056
		kmem_cache_free(btrfs_free_space_cachep, entry);
2057 2058
	}

2059
	spin_unlock(&ctl->tree_lock);
2060

2061 2062 2063
	return ret;
}

2064 2065 2066 2067 2068
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)
{
2069
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
2070 2071 2072 2073 2074 2075 2076
	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;
2077
	int ret;
2078 2079 2080 2081
	bool found = false;

	i = offset_to_bit(entry->offset, block_group->sectorsize,
			  max_t(u64, offset, entry->offset));
2082 2083
	search_bits = bytes_to_bits(bytes, block_group->sectorsize);
	total_bits = bytes_to_bits(min_bytes, block_group->sectorsize);
2084 2085 2086 2087 2088 2089 2090 2091 2092 2093 2094 2095 2096 2097 2098 2099

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)
2100
		return -ENOSPC;
2101 2102 2103 2104 2105 2106 2107 2108 2109 2110 2111 2112 2113 2114 2115 2116 2117 2118 2119 2120 2121 2122 2123

	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;
2124
	rb_erase(&entry->offset_index, &ctl->free_space_offset);
2125 2126 2127
	ret = tree_insert_offset(&cluster->root, entry->offset,
				 &entry->offset_index, 1);
	BUG_ON(ret);
2128 2129 2130 2131

	return 0;
}

2132 2133 2134 2135 2136 2137 2138
/*
 * 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)
{
2139
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
2140 2141 2142 2143 2144 2145 2146 2147 2148 2149
	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;

2150
	entry = tree_search_offset(ctl, offset, 0, 1);
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 2193 2194 2195 2196 2197 2198 2199 2200 2201 2202 2203 2204 2205 2206 2207 2208 2209 2210 2211 2212 2213 2214 2215
	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;

2216
		rb_erase(&entry->offset_index, &ctl->free_space_offset);
2217 2218 2219 2220 2221 2222 2223 2224 2225 2226 2227 2228 2229 2230 2231 2232 2233 2234
		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)
{
2235
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
2236 2237 2238 2239
	struct btrfs_free_space *entry;
	struct rb_node *node;
	int ret = -ENOSPC;

2240
	if (ctl->total_bitmaps == 0)
2241 2242
		return -ENOSPC;

2243
	entry = tree_search_offset(ctl, offset_to_bitmap(ctl, offset), 0, 1);
2244 2245 2246 2247 2248 2249 2250 2251 2252 2253 2254 2255 2256 2257 2258 2259 2260 2261
	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;
}

2262 2263 2264 2265 2266 2267 2268 2269 2270
/*
 * 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,
2271
			     struct btrfs_root *root,
2272 2273 2274 2275
			     struct btrfs_block_group_cache *block_group,
			     struct btrfs_free_cluster *cluster,
			     u64 offset, u64 bytes, u64 empty_size)
{
2276
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
2277 2278 2279 2280
	u64 min_bytes;
	int ret;

	/* for metadata, allow allocates with more holes */
2281 2282 2283
	if (btrfs_test_opt(root, SSD_SPREAD)) {
		min_bytes = bytes + empty_size;
	} else if (block_group->flags & BTRFS_BLOCK_GROUP_METADATA) {
2284 2285 2286 2287 2288 2289 2290 2291 2292 2293 2294 2295
		/*
		 * 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);

2296
	spin_lock(&ctl->tree_lock);
2297 2298 2299 2300 2301

	/*
	 * 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.
	 */
2302 2303
	if (ctl->free_space < min_bytes) {
		spin_unlock(&ctl->tree_lock);
2304 2305 2306
		return -ENOSPC;
	}

2307 2308 2309 2310 2311 2312 2313 2314
	spin_lock(&cluster->lock);

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

2315 2316 2317 2318 2319
	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);
2320

2321 2322 2323 2324 2325
	if (!ret) {
		atomic_inc(&block_group->count);
		list_add_tail(&cluster->block_group_list,
			      &block_group->cluster_list);
		cluster->block_group = block_group;
2326 2327 2328
	}
out:
	spin_unlock(&cluster->lock);
2329
	spin_unlock(&ctl->tree_lock);
2330 2331 2332 2333 2334 2335 2336 2337 2338 2339 2340

	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);
2341
	cluster->root = RB_ROOT;
2342 2343 2344 2345 2346
	cluster->max_size = 0;
	INIT_LIST_HEAD(&cluster->block_group_list);
	cluster->block_group = NULL;
}

2347 2348 2349
int btrfs_trim_block_group(struct btrfs_block_group_cache *block_group,
			   u64 *trimmed, u64 start, u64 end, u64 minlen)
{
2350
	struct btrfs_free_space_ctl *ctl = block_group->free_space_ctl;
2351 2352 2353 2354 2355 2356 2357 2358 2359
	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) {
2360
		spin_lock(&ctl->tree_lock);
2361

2362 2363
		if (ctl->free_space < minlen) {
			spin_unlock(&ctl->tree_lock);
2364 2365 2366
			break;
		}

2367
		entry = tree_search_offset(ctl, start, 0, 1);
2368
		if (!entry)
2369 2370
			entry = tree_search_offset(ctl,
						   offset_to_bitmap(ctl, start),
2371 2372 2373
						   1, 1);

		if (!entry || entry->offset >= end) {
2374
			spin_unlock(&ctl->tree_lock);
2375 2376 2377 2378
			break;
		}

		if (entry->bitmap) {
2379
			ret = search_bitmap(ctl, entry, &start, &bytes);
2380 2381
			if (!ret) {
				if (start >= end) {
2382
					spin_unlock(&ctl->tree_lock);
2383 2384 2385
					break;
				}
				bytes = min(bytes, end - start);
2386
				bitmap_clear_bits(ctl, entry, start, bytes);
2387
				if (entry->bytes == 0)
2388
					free_bitmap(ctl, entry);
2389 2390 2391
			} else {
				start = entry->offset + BITS_PER_BITMAP *
					block_group->sectorsize;
2392
				spin_unlock(&ctl->tree_lock);
2393 2394 2395 2396 2397 2398
				ret = 0;
				continue;
			}
		} else {
			start = entry->offset;
			bytes = min(entry->bytes, end - start);
2399
			unlink_free_space(ctl, entry);
2400
			kmem_cache_free(btrfs_free_space_cachep, entry);
2401 2402
		}

2403
		spin_unlock(&ctl->tree_lock);
2404 2405 2406 2407 2408 2409 2410 2411 2412 2413 2414

		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);

2415
			btrfs_add_free_space(block_group, start, bytes);
2416 2417 2418 2419 2420 2421 2422 2423 2424 2425 2426 2427 2428 2429 2430 2431 2432 2433 2434 2435 2436
			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;
}
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 2464 2465 2466 2467 2468 2469 2470 2471 2472 2473 2474 2475 2476 2477 2478 2479 2480 2481 2482 2483 2484 2485 2486

/*
 * 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;
}
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 2556 2557 2558 2559 2560 2561 2562 2563 2564 2565 2566 2567 2568 2569 2570 2571 2572 2573 2574 2575 2576 2577 2578

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;
}