Btrfs: alloc_mutex latency reduction
[pandora-kernel.git] / fs / btrfs / extent-tree.c
index 6540095..febc629 100644 (file)
@@ -17,6 +17,7 @@
  */
 #include <linux/sched.h>
 #include <linux/pagemap.h>
+#include <linux/writeback.h>
 #include "hash.h"
 #include "crc32c.h"
 #include "ctree.h"
@@ -24,6 +25,7 @@
 #include "print-tree.h"
 #include "transaction.h"
 #include "volumes.h"
+#include "locking.h"
 
 #define BLOCK_GROUP_DATA     EXTENT_WRITEBACK
 #define BLOCK_GROUP_METADATA EXTENT_UPTODATE
@@ -35,7 +37,28 @@ static int finish_current_insert(struct btrfs_trans_handle *trans, struct
                                 btrfs_root *extent_root);
 static int del_pending_extents(struct btrfs_trans_handle *trans, struct
                               btrfs_root *extent_root);
+static struct btrfs_block_group_cache *
+__btrfs_find_block_group(struct btrfs_root *root,
+                        struct btrfs_block_group_cache *hint,
+                        u64 search_start, int data, int owner);
 
+void maybe_lock_mutex(struct btrfs_root *root)
+{
+       if (root != root->fs_info->extent_root &&
+           root != root->fs_info->chunk_root &&
+           root != root->fs_info->dev_root) {
+               mutex_lock(&root->fs_info->alloc_mutex);
+       }
+}
+
+void maybe_unlock_mutex(struct btrfs_root *root)
+{
+       if (root != root->fs_info->extent_root &&
+           root != root->fs_info->chunk_root &&
+           root != root->fs_info->dev_root) {
+               mutex_unlock(&root->fs_info->alloc_mutex);
+       }
+}
 
 static int cache_block_group(struct btrfs_root *root,
                             struct btrfs_block_group_cache *block_group)
@@ -65,6 +88,12 @@ static int cache_block_group(struct btrfs_root *root,
                return -ENOMEM;
 
        path->reada = 2;
+       /*
+        * we get into deadlocks with paths held by callers of this function.
+        * since the alloc_mutex is protecting things right now, just
+        * skip the locking here
+        */
+       path->skip_locking = 1;
        first_free = block_group->key.objectid;
        key.objectid = block_group->key.objectid;
        key.offset = 0;
@@ -135,6 +164,35 @@ err:
        return 0;
 }
 
+struct btrfs_block_group_cache *btrfs_lookup_first_block_group(struct
+                                                      btrfs_fs_info *info,
+                                                        u64 bytenr)
+{
+       struct extent_io_tree *block_group_cache;
+       struct btrfs_block_group_cache *block_group = NULL;
+       u64 ptr;
+       u64 start;
+       u64 end;
+       int ret;
+
+       bytenr = max_t(u64, bytenr,
+                      BTRFS_SUPER_INFO_OFFSET + BTRFS_SUPER_INFO_SIZE);
+       block_group_cache = &info->block_group_cache;
+       ret = find_first_extent_bit(block_group_cache,
+                                   bytenr, &start, &end,
+                                   BLOCK_GROUP_DATA | BLOCK_GROUP_METADATA |
+                                   BLOCK_GROUP_SYSTEM);
+       if (ret) {
+               return NULL;
+       }
+       ret = get_state_private(block_group_cache, start, &ptr);
+       if (ret)
+               return NULL;
+
+       block_group = (struct btrfs_block_group_cache *)(unsigned long)ptr;
+       return block_group;
+}
+
 struct btrfs_block_group_cache *btrfs_lookup_block_group(struct
                                                         btrfs_fs_info *info,
                                                         u64 bytenr)
@@ -146,6 +204,8 @@ struct btrfs_block_group_cache *btrfs_lookup_block_group(struct
        u64 end;
        int ret;
 
+       bytenr = max_t(u64, bytenr,
+                      BTRFS_SUPER_INFO_OFFSET + BTRFS_SUPER_INFO_SIZE);
        block_group_cache = &info->block_group_cache;
        ret = find_first_extent_bit(block_group_cache,
                                    bytenr, &start, &end,
@@ -172,7 +232,7 @@ static int block_group_bits(struct btrfs_block_group_cache *cache, u64 bits)
 
 static int noinline find_search_start(struct btrfs_root *root,
                              struct btrfs_block_group_cache **cache_ret,
-                             u64 *start_ret, int num, int data)
+                             u64 *start_ret, u64 num, int data)
 {
        int ret;
        struct btrfs_block_group_cache *cache = *cache_ret;
@@ -185,21 +245,22 @@ static int noinline find_search_start(struct btrfs_root *root,
        u64 search_start = *start_ret;
        int wrapped = 0;
 
-       if (!cache)
-               goto out;
-
+       WARN_ON(!mutex_is_locked(&root->fs_info->alloc_mutex));
        total_fs_bytes = btrfs_super_total_bytes(&root->fs_info->super_copy);
        free_space_cache = &root->fs_info->free_space_cache;
 
+       if (!cache)
+               goto out;
+
 again:
        ret = cache_block_group(root, cache);
-       if (ret)
+       if (ret) {
                goto out;
+       }
 
        last = max(search_start, cache->key.objectid);
-       if (!block_group_bits(cache, data) || cache->ro) {
+       if (!block_group_bits(cache, data) || cache->ro)
                goto new_group;
-       }
 
        spin_lock_irq(&free_space_cache->lock);
        state = find_first_extent_bit_state(free_space_cache, last, EXTENT_DIRTY);
@@ -214,20 +275,17 @@ again:
                start = max(last, state->start);
                last = state->end + 1;
                if (last - start < num) {
-                       if (last == cache->key.objectid + cache->key.offset)
-                               cache_miss = start;
                        do {
                                state = extent_state_next(state);
                        } while(state && !(state->state & EXTENT_DIRTY));
                        continue;
                }
                spin_unlock_irq(&free_space_cache->lock);
-               if (cache->ro)
+               if (cache->ro) {
                        goto new_group;
+               }
                if (start + num > cache->key.objectid + cache->key.offset)
                        goto new_group;
-               if (start + num  > total_fs_bytes)
-                       goto new_group;
                if (!block_group_bits(cache, data)) {
                        printk("block group bits don't match %Lu %d\n", cache->flags, data);
                }
@@ -245,7 +303,7 @@ out:
 new_group:
        last = cache->key.objectid + cache->key.offset;
 wrapped:
-       cache = btrfs_lookup_block_group(root->fs_info, last);
+       cache = btrfs_lookup_first_block_group(root->fs_info, last);
        if (!cache || cache->key.objectid >= total_fs_bytes) {
 no_cache:
                if (!wrapped) {
@@ -258,13 +316,13 @@ no_cache:
        if (cache_miss && !cache->cached) {
                cache_block_group(root, cache);
                last = cache_miss;
-               cache = btrfs_lookup_block_group(root->fs_info, last);
+               cache = btrfs_lookup_first_block_group(root->fs_info, last);
        }
+       cache_miss = 0;
        cache = btrfs_find_block_group(root, cache, last, data, 0);
        if (!cache)
                goto no_cache;
        *cache_ret = cache;
-       cache_miss = 0;
        goto again;
 }
 
@@ -289,10 +347,10 @@ static int block_group_state_bits(u64 flags)
        return bits;
 }
 
-struct btrfs_block_group_cache *btrfs_find_block_group(struct btrfs_root *root,
-                                                struct btrfs_block_group_cache
-                                                *hint, u64 search_start,
-                                                int data, int owner)
+static struct btrfs_block_group_cache *
+__btrfs_find_block_group(struct btrfs_root *root,
+                        struct btrfs_block_group_cache *hint,
+                        u64 search_start, int data, int owner)
 {
        struct btrfs_block_group_cache *cache;
        struct extent_io_tree *block_group_cache;
@@ -300,54 +358,52 @@ struct btrfs_block_group_cache *btrfs_find_block_group(struct btrfs_root *root,
        struct btrfs_fs_info *info = root->fs_info;
        u64 used;
        u64 last = 0;
-       u64 hint_last;
        u64 start;
        u64 end;
        u64 free_check;
        u64 ptr;
-       u64 total_fs_bytes;
        int bit;
        int ret;
        int full_search = 0;
        int factor = 10;
+       int wrapped = 0;
 
        block_group_cache = &info->block_group_cache;
-       total_fs_bytes = btrfs_super_total_bytes(&root->fs_info->super_copy);
 
-       if (!owner)
-               factor = 10;
+       if (data & BTRFS_BLOCK_GROUP_METADATA)
+               factor = 9;
 
        bit = block_group_state_bits(data);
 
-       if (search_start && search_start < total_fs_bytes) {
+       if (search_start) {
                struct btrfs_block_group_cache *shint;
-               shint = btrfs_lookup_block_group(info, search_start);
+               shint = btrfs_lookup_first_block_group(info, search_start);
                if (shint && block_group_bits(shint, data) && !shint->ro) {
+                       spin_lock(&shint->lock);
                        used = btrfs_block_group_used(&shint->item);
                        if (used + shint->pinned <
                            div_factor(shint->key.offset, factor)) {
+                               spin_unlock(&shint->lock);
                                return shint;
                        }
+                       spin_unlock(&shint->lock);
                }
        }
-       if (hint && !hint->ro && block_group_bits(hint, data) &&
-           hint->key.objectid < total_fs_bytes) {
+       if (hint && !hint->ro && block_group_bits(hint, data)) {
+               spin_lock(&hint->lock);
                used = btrfs_block_group_used(&hint->item);
                if (used + hint->pinned <
                    div_factor(hint->key.offset, factor)) {
+                       spin_unlock(&hint->lock);
                        return hint;
                }
+               spin_unlock(&hint->lock);
                last = hint->key.objectid + hint->key.offset;
-               hint_last = last;
        } else {
                if (hint)
-                       hint_last = max(hint->key.objectid, search_start);
+                       last = max(hint->key.objectid, search_start);
                else
-                       hint_last = search_start;
-
-               if (hint_last >= total_fs_bytes)
-                       hint_last = search_start;
-               last = hint_last;
+                       last = search_start;
        }
 again:
        while(1) {
@@ -357,39 +413,52 @@ again:
                        break;
 
                ret = get_state_private(block_group_cache, start, &ptr);
-               if (ret)
-                       break;
+               if (ret) {
+                       last = end + 1;
+                       continue;
+               }
 
                cache = (struct btrfs_block_group_cache *)(unsigned long)ptr;
+               spin_lock(&cache->lock);
                last = cache->key.objectid + cache->key.offset;
                used = btrfs_block_group_used(&cache->item);
 
-               if (cache->key.objectid > total_fs_bytes)
-                       break;
-
                if (!cache->ro && block_group_bits(cache, data)) {
-                       if (full_search)
-                               free_check = cache->key.offset;
-                       else
-                               free_check = div_factor(cache->key.offset,
-                                                       factor);
-
+                       free_check = div_factor(cache->key.offset, factor);
                        if (used + cache->pinned < free_check) {
                                found_group = cache;
+                               spin_unlock(&cache->lock);
                                goto found;
                        }
                }
+               spin_unlock(&cache->lock);
                cond_resched();
        }
-       if (!full_search) {
+       if (!wrapped) {
+               last = search_start;
+               wrapped = 1;
+               goto again;
+       }
+       if (!full_search && factor < 10) {
                last = search_start;
                full_search = 1;
+               factor = 10;
                goto again;
        }
 found:
        return found_group;
 }
 
+struct btrfs_block_group_cache *btrfs_find_block_group(struct btrfs_root *root,
+                                                struct btrfs_block_group_cache
+                                                *hint, u64 search_start,
+                                                int data, int owner)
+{
+
+       struct btrfs_block_group_cache *ret;
+       ret = __btrfs_find_block_group(root, hint, search_start, data, owner);
+       return ret;
+}
 static u64 hash_extent_ref(u64 root_objectid, u64 ref_generation,
                           u64 owner, u64 owner_offset)
 {
@@ -625,7 +694,7 @@ out:
        return ret;
 }
 
-int btrfs_inc_extent_ref(struct btrfs_trans_handle *trans,
+static int __btrfs_inc_extent_ref(struct btrfs_trans_handle *trans,
                                struct btrfs_root *root,
                                u64 bytenr, u64 num_bytes,
                                u64 root_objectid, u64 ref_generation,
@@ -675,6 +744,22 @@ int btrfs_inc_extent_ref(struct btrfs_trans_handle *trans,
        return 0;
 }
 
+int btrfs_inc_extent_ref(struct btrfs_trans_handle *trans,
+                               struct btrfs_root *root,
+                               u64 bytenr, u64 num_bytes,
+                               u64 root_objectid, u64 ref_generation,
+                               u64 owner, u64 owner_offset)
+{
+       int ret;
+
+       mutex_lock(&root->fs_info->alloc_mutex);
+       ret = __btrfs_inc_extent_ref(trans, root, bytenr, num_bytes,
+                                    root_objectid, ref_generation,
+                                    owner, owner_offset);
+       mutex_unlock(&root->fs_info->alloc_mutex);
+       return ret;
+}
+
 int btrfs_extent_post_op(struct btrfs_trans_handle *trans,
                         struct btrfs_root *root)
 {
@@ -718,14 +803,17 @@ out:
 
 u32 btrfs_count_snapshots_in_path(struct btrfs_root *root,
                                  struct btrfs_path *count_path,
+                                 u64 expected_owner,
                                  u64 first_extent)
 {
        struct btrfs_root *extent_root = root->fs_info->extent_root;
        struct btrfs_path *path;
        u64 bytenr;
        u64 found_objectid;
+       u64 found_owner;
        u64 root_objectid = root->root_key.objectid;
        u32 total_count = 0;
+       u32 extent_refs;
        u32 cur_count;
        u32 nritems;
        int ret;
@@ -736,6 +824,10 @@ u32 btrfs_count_snapshots_in_path(struct btrfs_root *root,
        struct btrfs_extent_ref *ref_item;
        int level = -1;
 
+       /* FIXME, needs locking */
+       BUG();
+
+       mutex_lock(&root->fs_info->alloc_mutex);
        path = btrfs_alloc_path();
 again:
        if (level == -1)
@@ -762,6 +854,7 @@ again:
        }
 
        item = btrfs_item_ptr(l, path->slots[0], struct btrfs_extent_item);
+       extent_refs = btrfs_extent_refs(l, item);
        while (1) {
                l = path->nodes[0];
                nritems = btrfs_header_nritems(l);
@@ -789,9 +882,34 @@ again:
                        total_count = 2;
                        goto out;
                }
+               if (level == -1) {
+                       found_owner = btrfs_ref_objectid(l, ref_item);
+                       if (found_owner != expected_owner) {
+                               total_count = 2;
+                               goto out;
+                       }
+                       /*
+                        * nasty.  we don't count a reference held by
+                        * the running transaction.  This allows nodatacow
+                        * to avoid cow most of the time
+                        */
+                       if (found_owner >= BTRFS_FIRST_FREE_OBJECTID &&
+                           btrfs_ref_generation(l, ref_item) ==
+                           root->fs_info->generation) {
+                               extent_refs--;
+                       }
+               }
                total_count = 1;
                path->slots[0]++;
        }
+       /*
+        * if there is more than one reference against a data extent,
+        * we have to assume the other ref is another snapshot
+        */
+       if (level == -1 && extent_refs > 1) {
+               total_count = 2;
+               goto out;
+       }
        if (cur_count == 0) {
                total_count = 0;
                goto out;
@@ -804,33 +922,9 @@ again:
 
 out:
        btrfs_free_path(path);
+       mutex_unlock(&root->fs_info->alloc_mutex);
        return total_count;
 }
-int btrfs_inc_root_ref(struct btrfs_trans_handle *trans,
-                      struct btrfs_root *root, u64 owner_objectid)
-{
-       u64 generation;
-       u64 key_objectid;
-       u64 level;
-       u32 nritems;
-       struct btrfs_disk_key disk_key;
-
-       level = btrfs_header_level(root->node);
-       generation = trans->transid;
-       nritems = btrfs_header_nritems(root->node);
-       if (nritems > 0) {
-               if (level == 0)
-                       btrfs_item_key(root->node, &disk_key, 0);
-               else
-                       btrfs_node_key(root->node, &disk_key, 0);
-               key_objectid = btrfs_disk_key_objectid(&disk_key);
-       } else {
-               key_objectid = 0;
-       }
-       return btrfs_inc_extent_ref(trans, root, root->node->start,
-                                   root->node->len, owner_objectid,
-                                   generation, level, key_objectid);
-}
 
 int btrfs_inc_ref(struct btrfs_trans_handle *trans, struct btrfs_root *root,
                  struct extent_buffer *buf)
@@ -850,6 +944,7 @@ int btrfs_inc_ref(struct btrfs_trans_handle *trans, struct btrfs_root *root,
        level = btrfs_header_level(buf);
        nritems = btrfs_header_nritems(buf);
        for (i = 0; i < nritems; i++) {
+               cond_resched();
                if (level == 0) {
                        u64 disk_bytenr;
                        btrfs_item_key_to_cpu(buf, &key, i);
@@ -863,24 +958,32 @@ int btrfs_inc_ref(struct btrfs_trans_handle *trans, struct btrfs_root *root,
                        disk_bytenr = btrfs_file_extent_disk_bytenr(buf, fi);
                        if (disk_bytenr == 0)
                                continue;
-                       ret = btrfs_inc_extent_ref(trans, root, disk_bytenr,
+
+                       mutex_lock(&root->fs_info->alloc_mutex);
+                       ret = __btrfs_inc_extent_ref(trans, root, disk_bytenr,
                                    btrfs_file_extent_disk_num_bytes(buf, fi),
                                    root->root_key.objectid, trans->transid,
                                    key.objectid, key.offset);
+                       mutex_unlock(&root->fs_info->alloc_mutex);
                        if (ret) {
                                faili = i;
+                               WARN_ON(1);
                                goto fail;
                        }
                } else {
                        bytenr = btrfs_node_blockptr(buf, i);
                        btrfs_node_key_to_cpu(buf, &key, i);
-                       ret = btrfs_inc_extent_ref(trans, root, bytenr,
+
+                       mutex_lock(&root->fs_info->alloc_mutex);
+                       ret = __btrfs_inc_extent_ref(trans, root, bytenr,
                                           btrfs_level_size(root, level - 1),
                                           root->root_key.objectid,
                                           trans->transid,
                                           level - 1, key.objectid);
+                       mutex_unlock(&root->fs_info->alloc_mutex);
                        if (ret) {
                                faili = i;
+                               WARN_ON(1);
                                goto fail;
                        }
                }
@@ -969,6 +1072,7 @@ int btrfs_write_dirty_block_groups(struct btrfs_trans_handle *trans,
        if (!path)
                return -ENOMEM;
 
+       mutex_lock(&root->fs_info->alloc_mutex);
        while(1) {
                ret = find_first_extent_bit(block_group_cache, last,
                                            &start, &end, BLOCK_GROUP_DIRTY);
@@ -995,6 +1099,7 @@ int btrfs_write_dirty_block_groups(struct btrfs_trans_handle *trans,
                                  BLOCK_GROUP_DIRTY, GFP_NOFS);
        }
        btrfs_free_path(path);
+       mutex_unlock(&root->fs_info->alloc_mutex);
        return werr;
 }
 
@@ -1038,6 +1143,7 @@ static int update_space_info(struct btrfs_fs_info *info, u64 flags,
        found->bytes_used = bytes_used;
        found->bytes_pinned = 0;
        found->full = 0;
+       found->force_alloc = 0;
        *space_info = found;
        return 0;
 }
@@ -1058,9 +1164,37 @@ static void set_avail_alloc_bits(struct btrfs_fs_info *fs_info, u64 flags)
        }
 }
 
+static u64 reduce_alloc_profile(struct btrfs_root *root, u64 flags)
+{
+       u64 num_devices = root->fs_info->fs_devices->num_devices;
+
+       if (num_devices == 1)
+               flags &= ~(BTRFS_BLOCK_GROUP_RAID1 | BTRFS_BLOCK_GROUP_RAID0);
+       if (num_devices < 4)
+               flags &= ~BTRFS_BLOCK_GROUP_RAID10;
+
+       if ((flags & BTRFS_BLOCK_GROUP_DUP) &&
+           (flags & (BTRFS_BLOCK_GROUP_RAID1 |
+                     BTRFS_BLOCK_GROUP_RAID10))) {
+               flags &= ~BTRFS_BLOCK_GROUP_DUP;
+       }
+
+       if ((flags & BTRFS_BLOCK_GROUP_RAID1) &&
+           (flags & BTRFS_BLOCK_GROUP_RAID10)) {
+               flags &= ~BTRFS_BLOCK_GROUP_RAID1;
+       }
+
+       if ((flags & BTRFS_BLOCK_GROUP_RAID0) &&
+           ((flags & BTRFS_BLOCK_GROUP_RAID1) |
+            (flags & BTRFS_BLOCK_GROUP_RAID10) |
+            (flags & BTRFS_BLOCK_GROUP_DUP)))
+               flags &= ~BTRFS_BLOCK_GROUP_RAID0;
+       return flags;
+}
+
 static int do_chunk_alloc(struct btrfs_trans_handle *trans,
                          struct btrfs_root *extent_root, u64 alloc_bytes,
-                         u64 flags)
+                         u64 flags, int force)
 {
        struct btrfs_space_info *space_info;
        u64 thresh;
@@ -1068,6 +1202,8 @@ static int do_chunk_alloc(struct btrfs_trans_handle *trans,
        u64 num_bytes;
        int ret;
 
+       flags = reduce_alloc_profile(extent_root, flags);
+
        space_info = __find_space_info(extent_root->fs_info, flags);
        if (!space_info) {
                ret = update_space_info(extent_root->fs_info, flags,
@@ -1076,27 +1212,34 @@ static int do_chunk_alloc(struct btrfs_trans_handle *trans,
        }
        BUG_ON(!space_info);
 
+       if (space_info->force_alloc) {
+               force = 1;
+               space_info->force_alloc = 0;
+       }
        if (space_info->full)
-               return 0;
+               goto out;
 
        thresh = div_factor(space_info->total_bytes, 6);
-       if ((space_info->bytes_used + space_info->bytes_pinned + alloc_bytes) <
+       if (!force &&
+          (space_info->bytes_used + space_info->bytes_pinned + alloc_bytes) <
            thresh)
-               return 0;
+               goto out;
 
+       mutex_lock(&extent_root->fs_info->chunk_mutex);
        ret = btrfs_alloc_chunk(trans, extent_root, &start, &num_bytes, flags);
        if (ret == -ENOSPC) {
 printk("space info full %Lu\n", flags);
                space_info->full = 1;
-               return 0;
+               goto out_unlock;
        }
-
        BUG_ON(ret);
 
        ret = btrfs_make_block_group(trans, extent_root, 0, flags,
                     BTRFS_FIRST_CHUNK_TREE_OBJECTID, start, num_bytes);
        BUG_ON(ret);
-
+out_unlock:
+       mutex_unlock(&extent_root->fs_info->chunk_mutex);
+out:
        return 0;
 }
 
@@ -1113,6 +1256,7 @@ static int update_block_group(struct btrfs_trans_handle *trans,
        u64 start;
        u64 end;
 
+       WARN_ON(!mutex_is_locked(&root->fs_info->alloc_mutex));
        while(total) {
                cache = btrfs_lookup_block_group(info, bytenr);
                if (!cache) {
@@ -1125,27 +1269,46 @@ static int update_block_group(struct btrfs_trans_handle *trans,
                set_extent_bits(&info->block_group_cache, start, end,
                                BLOCK_GROUP_DIRTY, GFP_NOFS);
 
+               spin_lock(&cache->lock);
                old_val = btrfs_block_group_used(&cache->item);
                num_bytes = min(total, cache->key.offset - byte_in_group);
                if (alloc) {
                        old_val += num_bytes;
                        cache->space_info->bytes_used += num_bytes;
+                       btrfs_set_block_group_used(&cache->item, old_val);
+                       spin_unlock(&cache->lock);
                } else {
                        old_val -= num_bytes;
                        cache->space_info->bytes_used -= num_bytes;
+                       btrfs_set_block_group_used(&cache->item, old_val);
+                       spin_unlock(&cache->lock);
                        if (mark_free) {
                                set_extent_dirty(&info->free_space_cache,
                                                 bytenr, bytenr + num_bytes - 1,
                                                 GFP_NOFS);
                        }
                }
-               btrfs_set_block_group_used(&cache->item, old_val);
                total -= num_bytes;
                bytenr += num_bytes;
        }
        return 0;
 }
 
+static u64 first_logical_byte(struct btrfs_root *root, u64 search_start)
+{
+       u64 start;
+       u64 end;
+       int ret;
+       ret = find_first_extent_bit(&root->fs_info->block_group_cache,
+                                   search_start, &start, &end,
+                                   BLOCK_GROUP_DATA | BLOCK_GROUP_METADATA |
+                                   BLOCK_GROUP_SYSTEM);
+       if (ret)
+               return 0;
+       return start;
+}
+
+
 static int update_pinned_extents(struct btrfs_root *root,
                                u64 bytenr, u64 num, int pin)
 {
@@ -1153,6 +1316,7 @@ static int update_pinned_extents(struct btrfs_root *root,
        struct btrfs_block_group_cache *cache;
        struct btrfs_fs_info *fs_info = root->fs_info;
 
+       WARN_ON(!mutex_is_locked(&root->fs_info->alloc_mutex));
        if (pin) {
                set_extent_dirty(&fs_info->pinned_extents,
                                bytenr, bytenr + num - 1, GFP_NOFS);
@@ -1162,16 +1326,29 @@ static int update_pinned_extents(struct btrfs_root *root,
        }
        while (num > 0) {
                cache = btrfs_lookup_block_group(fs_info, bytenr);
-               WARN_ON(!cache);
-               len = min(num, cache->key.offset -
-                         (bytenr - cache->key.objectid));
+               if (!cache) {
+                       u64 first = first_logical_byte(root, bytenr);
+                       WARN_ON(first < bytenr);
+                       len = min(first - bytenr, num);
+               } else {
+                       len = min(num, cache->key.offset -
+                                 (bytenr - cache->key.objectid));
+               }
                if (pin) {
-                       cache->pinned += len;
-                       cache->space_info->bytes_pinned += len;
+                       if (cache) {
+                               spin_lock(&cache->lock);
+                               cache->pinned += len;
+                               cache->space_info->bytes_pinned += len;
+                               spin_unlock(&cache->lock);
+                       }
                        fs_info->total_pinned += len;
                } else {
-                       cache->pinned -= len;
-                       cache->space_info->bytes_pinned -= len;
+                       if (cache) {
+                               spin_lock(&cache->lock);
+                               cache->pinned -= len;
+                               cache->space_info->bytes_pinned -= len;
+                               spin_unlock(&cache->lock);
+                       }
                        fs_info->total_pinned -= len;
                }
                bytenr += len;
@@ -1209,6 +1386,7 @@ int btrfs_finish_extent_commit(struct btrfs_trans_handle *trans,
        struct extent_io_tree *free_space_cache;
        free_space_cache = &root->fs_info->free_space_cache;
 
+       mutex_lock(&root->fs_info->alloc_mutex);
        while(1) {
                ret = find_first_extent_bit(unpin, 0, &start, &end,
                                            EXTENT_DIRTY);
@@ -1217,7 +1395,13 @@ int btrfs_finish_extent_commit(struct btrfs_trans_handle *trans,
                update_pinned_extents(root, start, end + 1 - start, 0);
                clear_extent_dirty(unpin, start, end, GFP_NOFS);
                set_extent_dirty(free_space_cache, start, end, GFP_NOFS);
+               if (need_resched()) {
+                       mutex_unlock(&root->fs_info->alloc_mutex);
+                       cond_resched();
+                       mutex_lock(&root->fs_info->alloc_mutex);
+               }
        }
+       mutex_unlock(&root->fs_info->alloc_mutex);
        return 0;
 }
 
@@ -1236,6 +1420,7 @@ static int finish_current_insert(struct btrfs_trans_handle *trans,
        int level;
        int err = 0;
 
+       WARN_ON(!mutex_is_locked(&extent_root->fs_info->alloc_mutex));
        btrfs_set_stack_extent_refs(&extent_item, 1);
        btrfs_set_key_type(&ins, BTRFS_EXTENT_ITEM_KEY);
        path = btrfs_alloc_path();
@@ -1252,19 +1437,39 @@ static int finish_current_insert(struct btrfs_trans_handle *trans,
                                        &extent_item, sizeof(extent_item));
                clear_extent_bits(&info->extent_ins, start, end, EXTENT_LOCKED,
                                  GFP_NOFS);
-               eb = read_tree_block(extent_root, ins.objectid, ins.offset);
+
+               eb = btrfs_find_tree_block(extent_root, ins.objectid,
+                                          ins.offset);
+
+               if (!btrfs_buffer_uptodate(eb, trans->transid)) {
+                       mutex_unlock(&extent_root->fs_info->alloc_mutex);
+                       btrfs_read_buffer(eb, trans->transid);
+                       mutex_lock(&extent_root->fs_info->alloc_mutex);
+               }
+
+               btrfs_tree_lock(eb);
                level = btrfs_header_level(eb);
                if (level == 0) {
                        btrfs_item_key(eb, &first, 0);
                } else {
                        btrfs_node_key(eb, &first, 0);
                }
+               btrfs_tree_unlock(eb);
+               free_extent_buffer(eb);
+               /*
+                * the first key is just a hint, so the race we've created
+                * against reading it is fine
+                */
                err = btrfs_insert_extent_backref(trans, extent_root, path,
                                          start, extent_root->root_key.objectid,
                                          0, level,
                                          btrfs_disk_key_objectid(&first));
                BUG_ON(err);
-               free_extent_buffer(eb);
+               if (need_resched()) {
+                       mutex_unlock(&extent_root->fs_info->alloc_mutex);
+                       cond_resched();
+                       mutex_lock(&extent_root->fs_info->alloc_mutex);
+               }
        }
        btrfs_free_path(path);
        return 0;
@@ -1274,12 +1479,14 @@ static int pin_down_bytes(struct btrfs_root *root, u64 bytenr, u32 num_bytes,
                          int pending)
 {
        int err = 0;
-       struct extent_buffer *buf;
 
+       WARN_ON(!mutex_is_locked(&root->fs_info->alloc_mutex));
        if (!pending) {
+               struct extent_buffer *buf;
                buf = btrfs_find_tree_block(root, bytenr, num_bytes);
                if (buf) {
-                       if (btrfs_buffer_uptodate(buf)) {
+                       if (btrfs_try_tree_lock(buf) &&
+                           btrfs_buffer_uptodate(buf, 0)) {
                                u64 transid =
                                    root->fs_info->running_transaction->transid;
                                u64 header_transid =
@@ -1288,9 +1495,11 @@ static int pin_down_bytes(struct btrfs_root *root, u64 bytenr, u32 num_bytes,
                                    !btrfs_header_flag(buf,
                                               BTRFS_HEADER_FLAG_WRITTEN)) {
                                        clean_tree_block(NULL, root, buf);
+                                       btrfs_tree_unlock(buf);
                                        free_extent_buffer(buf);
                                        return 1;
                                }
+                               btrfs_tree_unlock(buf);
                        }
                        free_extent_buffer(buf);
                }
@@ -1325,6 +1534,7 @@ static int __free_extent(struct btrfs_trans_handle *trans, struct btrfs_root
        struct btrfs_extent_item *ei;
        u32 refs;
 
+       WARN_ON(!mutex_is_locked(&root->fs_info->alloc_mutex));
        key.objectid = bytenr;
        btrfs_set_key_type(&key, BTRFS_EXTENT_ITEM_KEY);
        key.offset = num_bytes;
@@ -1416,9 +1626,11 @@ static int __free_extent(struct btrfs_trans_handle *trans, struct btrfs_root
                }
 
                /* block accounting for super block */
+               spin_lock_irq(&info->delalloc_lock);
                super_used = btrfs_super_bytes_used(&info->super_copy);
                btrfs_set_super_bytes_used(&info->super_copy,
                                           super_used - num_bytes);
+               spin_unlock_irq(&info->delalloc_lock);
 
                /* block accounting for root item */
                root_used = btrfs_root_used(&root->root_item);
@@ -1452,6 +1664,7 @@ static int del_pending_extents(struct btrfs_trans_handle *trans, struct
        struct extent_io_tree *pending_del;
        struct extent_io_tree *pinned_extents;
 
+       WARN_ON(!mutex_is_locked(&extent_root->fs_info->alloc_mutex));
        pending_del = &extent_root->fs_info->pending_del;
        pinned_extents = &extent_root->fs_info->pinned_extents;
 
@@ -1460,15 +1673,28 @@ static int del_pending_extents(struct btrfs_trans_handle *trans, struct
                                            EXTENT_LOCKED);
                if (ret)
                        break;
-               update_pinned_extents(extent_root, start, end + 1 - start, 1);
                clear_extent_bits(pending_del, start, end, EXTENT_LOCKED,
                                  GFP_NOFS);
-               ret = __free_extent(trans, extent_root,
-                                    start, end + 1 - start,
-                                    extent_root->root_key.objectid,
-                                    0, 0, 0, 0, 0);
+               if (!test_range_bit(&extent_root->fs_info->extent_ins,
+                                   start, end, EXTENT_LOCKED, 0)) {
+                       update_pinned_extents(extent_root, start,
+                                             end + 1 - start, 1);
+                       ret = __free_extent(trans, extent_root,
+                                            start, end + 1 - start,
+                                            extent_root->root_key.objectid,
+                                            0, 0, 0, 0, 0);
+               } else {
+                       clear_extent_bits(&extent_root->fs_info->extent_ins,
+                                         start, end, EXTENT_LOCKED, GFP_NOFS);
+               }
                if (ret)
                        err = ret;
+
+               if (need_resched()) {
+                       mutex_unlock(&extent_root->fs_info->alloc_mutex);
+                       cond_resched();
+                       mutex_lock(&extent_root->fs_info->alloc_mutex);
+               }
        }
        return err;
 }
@@ -1476,10 +1702,11 @@ static int del_pending_extents(struct btrfs_trans_handle *trans, struct
 /*
  * remove an extent from the root, returns 0 on success
  */
-int btrfs_free_extent(struct btrfs_trans_handle *trans, struct btrfs_root
-                     *root, u64 bytenr, u64 num_bytes,
-                     u64 root_objectid, u64 ref_generation,
-                     u64 owner_objectid, u64 owner_offset, int pin)
+static int __btrfs_free_extent(struct btrfs_trans_handle *trans,
+                              struct btrfs_root *root, u64 bytenr,
+                              u64 num_bytes, u64 root_objectid,
+                              u64 ref_generation, u64 owner_objectid,
+                              u64 owner_offset, int pin)
 {
        struct btrfs_root *extent_root = root->fs_info->extent_root;
        int pending_ret;
@@ -1496,10 +1723,28 @@ int btrfs_free_extent(struct btrfs_trans_handle *trans, struct btrfs_root
        ret = __free_extent(trans, root, bytenr, num_bytes, root_objectid,
                            ref_generation, owner_objectid, owner_offset,
                            pin, pin == 0);
+
+       finish_current_insert(trans, root->fs_info->extent_root);
        pending_ret = del_pending_extents(trans, root->fs_info->extent_root);
        return ret ? ret : pending_ret;
 }
 
+int btrfs_free_extent(struct btrfs_trans_handle *trans,
+                     struct btrfs_root *root, u64 bytenr,
+                     u64 num_bytes, u64 root_objectid,
+                     u64 ref_generation, u64 owner_objectid,
+                     u64 owner_offset, int pin)
+{
+       int ret;
+
+       maybe_lock_mutex(root);
+       ret = __btrfs_free_extent(trans, root, bytenr, num_bytes,
+                                 root_objectid, ref_generation,
+                                 owner_objectid, owner_offset, pin);
+       maybe_unlock_mutex(root);
+       return ret;
+}
+
 static u64 stripe_align(struct btrfs_root *root, u64 val)
 {
        u64 mask = ((u64)root->stripesize - 1);
@@ -1524,7 +1769,7 @@ static int noinline find_free_extent(struct btrfs_trans_handle *trans,
                                     int data)
 {
        int ret;
-       u64 orig_search_start = search_start;
+       u64 orig_search_start;
        struct btrfs_root * root = orig_root->fs_info->extent_root;
        struct btrfs_fs_info *info = root->fs_info;
        u64 total_needed = num_bytes;
@@ -1532,11 +1777,16 @@ static int noinline find_free_extent(struct btrfs_trans_handle *trans,
        struct btrfs_block_group_cache *block_group;
        int full_scan = 0;
        int wrapped = 0;
+       int chunk_alloc_done = 0;
        int empty_cluster = 2 * 1024 * 1024;
+       int allowed_chunk_alloc = 0;
 
        WARN_ON(num_bytes < root->sectorsize);
        btrfs_set_key_type(ins, BTRFS_EXTENT_ITEM_KEY);
 
+       if (orig_root->ref_cows || empty_size)
+               allowed_chunk_alloc = 1;
+
        if (data & BTRFS_BLOCK_GROUP_METADATA) {
                last_ptr = &root->fs_info->last_alloc;
                empty_cluster = 256 * 1024;
@@ -1554,11 +1804,14 @@ static int noinline find_free_extent(struct btrfs_trans_handle *trans,
                }
        }
 
+       search_start = max(search_start, first_logical_byte(root, 0));
+       orig_search_start = search_start;
+
        if (search_end == (u64)-1)
                search_end = btrfs_super_total_bytes(&info->super_copy);
 
        if (hint_byte) {
-               block_group = btrfs_lookup_block_group(info, hint_byte);
+               block_group = btrfs_lookup_first_block_group(info, hint_byte);
                if (!block_group)
                        hint_byte = search_start;
                block_group = btrfs_find_block_group(root, block_group,
@@ -1576,17 +1829,28 @@ static int noinline find_free_extent(struct btrfs_trans_handle *trans,
 
 check_failed:
        if (!block_group) {
-               block_group = btrfs_lookup_block_group(info, search_start);
+               block_group = btrfs_lookup_first_block_group(info,
+                                                            search_start);
                if (!block_group)
-                       block_group = btrfs_lookup_block_group(info,
+                       block_group = btrfs_lookup_first_block_group(info,
                                                       orig_search_start);
        }
+       if (full_scan && !chunk_alloc_done) {
+               if (allowed_chunk_alloc) {
+                       do_chunk_alloc(trans, root,
+                                    num_bytes + 2 * 1024 * 1024, data, 1);
+                       allowed_chunk_alloc = 0;
+               } else if (block_group && block_group_bits(block_group, data)) {
+                       block_group->space_info->force_alloc = 1;
+               }
+               chunk_alloc_done = 1;
+       }
        ret = find_search_start(root, &block_group, &search_start,
                                total_needed, data);
        if (ret == -ENOSPC && last_ptr && *last_ptr) {
                *last_ptr = 0;
-               block_group = btrfs_lookup_block_group(info,
-                                                      orig_search_start);
+               block_group = btrfs_lookup_first_block_group(info,
+                                                            orig_search_start);
                search_start = orig_search_start;
                ret = find_search_start(root, &block_group, &search_start,
                                        total_needed, data);
@@ -1602,7 +1866,7 @@ check_failed:
                        empty_size += empty_cluster;
                        total_needed += empty_size;
                }
-               block_group = btrfs_lookup_block_group(info,
+               block_group = btrfs_lookup_first_block_group(info,
                                                       orig_search_start);
                search_start = orig_search_start;
                ret = find_search_start(root, &block_group,
@@ -1675,7 +1939,7 @@ enospc:
                } else
                        wrapped = 1;
        }
-       block_group = btrfs_lookup_block_group(info, search_start);
+       block_group = btrfs_lookup_first_block_group(info, search_start);
        cond_resched();
        block_group = btrfs_find_block_group(root, block_group,
                                             search_start, data, 0);
@@ -1684,34 +1948,18 @@ enospc:
 error:
        return ret;
 }
-/*
- * finds a free extent and does all the dirty work required for allocation
- * returns the key for the extent through ins, and a tree buffer for
- * the first block of the extent through buf.
- *
- * returns 0 if everything worked, non-zero otherwise.
- */
-int btrfs_alloc_extent(struct btrfs_trans_handle *trans,
-                      struct btrfs_root *root,
-                      u64 num_bytes, u64 min_alloc_size,
-                      u64 root_objectid, u64 ref_generation,
-                      u64 owner, u64 owner_offset,
-                      u64 empty_size, u64 hint_byte,
-                      u64 search_end, struct btrfs_key *ins, int data)
+
+static int __btrfs_reserve_extent(struct btrfs_trans_handle *trans,
+                                 struct btrfs_root *root,
+                                 u64 num_bytes, u64 min_alloc_size,
+                                 u64 empty_size, u64 hint_byte,
+                                 u64 search_end, struct btrfs_key *ins,
+                                 u64 data)
 {
        int ret;
-       int pending_ret;
-       u64 super_used;
-       u64 root_used;
        u64 search_start = 0;
        u64 alloc_profile;
-       u32 sizes[2];
        struct btrfs_fs_info *info = root->fs_info;
-       struct btrfs_root *extent_root = info->extent_root;
-       struct btrfs_extent_item *extent_item;
-       struct btrfs_extent_ref *ref;
-       struct btrfs_path *path;
-       struct btrfs_key keys[2];
 
        if (data) {
                alloc_profile = info->avail_data_alloc_bits &
@@ -1727,17 +1975,22 @@ int btrfs_alloc_extent(struct btrfs_trans_handle *trans,
                data = BTRFS_BLOCK_GROUP_METADATA | alloc_profile;
        }
 again:
-       if (root != root->fs_info->extent_root) {
+       data = reduce_alloc_profile(root, data);
+       /*
+        * the only place that sets empty_size is btrfs_realloc_node, which
+        * is not called recursively on allocations
+        */
+       if (empty_size || root->ref_cows) {
                if (!(data & BTRFS_BLOCK_GROUP_METADATA)) {
                        ret = do_chunk_alloc(trans, root->fs_info->extent_root,
-                                            2 * 1024 * 1024,
-                                            BTRFS_BLOCK_GROUP_METADATA |
-                                            (info->metadata_alloc_profile &
-                                             info->avail_metadata_alloc_bits));
+                                    2 * 1024 * 1024,
+                                    BTRFS_BLOCK_GROUP_METADATA |
+                                    (info->metadata_alloc_profile &
+                                     info->avail_metadata_alloc_bits), 0);
                        BUG_ON(ret);
                }
                ret = do_chunk_alloc(trans, root->fs_info->extent_root,
-                                    num_bytes + 2 * 1024 * 1024, data);
+                                    num_bytes + 2 * 1024 * 1024, data, 0);
                BUG_ON(ret);
        }
 
@@ -1750,24 +2003,65 @@ again:
        if (ret == -ENOSPC && num_bytes > min_alloc_size) {
                num_bytes = num_bytes >> 1;
                num_bytes = max(num_bytes, min_alloc_size);
+               do_chunk_alloc(trans, root->fs_info->extent_root,
+                              num_bytes, data, 1);
                goto again;
        }
-       BUG_ON(ret);
-       if (ret)
-               return ret;
+       if (ret) {
+               printk("allocation failed flags %Lu\n", data);
+               BUG();
+       }
+       clear_extent_dirty(&root->fs_info->free_space_cache,
+                          ins->objectid, ins->objectid + ins->offset - 1,
+                          GFP_NOFS);
+       return 0;
+}
+
+int btrfs_reserve_extent(struct btrfs_trans_handle *trans,
+                                 struct btrfs_root *root,
+                                 u64 num_bytes, u64 min_alloc_size,
+                                 u64 empty_size, u64 hint_byte,
+                                 u64 search_end, struct btrfs_key *ins,
+                                 u64 data)
+{
+       int ret;
+       maybe_lock_mutex(root);
+       ret = __btrfs_reserve_extent(trans, root, num_bytes, min_alloc_size,
+                                    empty_size, hint_byte, search_end, ins,
+                                    data);
+       maybe_unlock_mutex(root);
+       return ret;
+}
+
+static int __btrfs_alloc_reserved_extent(struct btrfs_trans_handle *trans,
+                                        struct btrfs_root *root,
+                                        u64 root_objectid, u64 ref_generation,
+                                        u64 owner, u64 owner_offset,
+                                        struct btrfs_key *ins)
+{
+       int ret;
+       int pending_ret;
+       u64 super_used;
+       u64 root_used;
+       u64 num_bytes = ins->offset;
+       u32 sizes[2];
+       struct btrfs_fs_info *info = root->fs_info;
+       struct btrfs_root *extent_root = info->extent_root;
+       struct btrfs_extent_item *extent_item;
+       struct btrfs_extent_ref *ref;
+       struct btrfs_path *path;
+       struct btrfs_key keys[2];
 
        /* block accounting for super block */
+       spin_lock_irq(&info->delalloc_lock);
        super_used = btrfs_super_bytes_used(&info->super_copy);
        btrfs_set_super_bytes_used(&info->super_copy, super_used + num_bytes);
+       spin_unlock_irq(&info->delalloc_lock);
 
        /* block accounting for root item */
        root_used = btrfs_root_used(&root->root_item);
        btrfs_set_root_used(&root->root_item, root_used + num_bytes);
 
-       clear_extent_dirty(&root->fs_info->free_space_cache,
-                          ins->objectid, ins->objectid + ins->offset - 1,
-                          GFP_NOFS);
-
        if (root == extent_root) {
                set_extent_bits(&root->fs_info->extent_ins, ins->objectid,
                                ins->objectid + ins->offset - 1,
@@ -1775,10 +2069,6 @@ again:
                goto update_block;
        }
 
-       WARN_ON(trans->alloc_exclude_nr);
-       trans->alloc_exclude_start = ins->objectid;
-       trans->alloc_exclude_nr = ins->offset;
-
        memcpy(&keys[0], ins, sizeof(*ins));
        keys[1].offset = hash_extent_ref(root_objectid, ref_generation,
                                         owner, owner_offset);
@@ -1813,11 +2103,11 @@ again:
        finish_current_insert(trans, extent_root);
        pending_ret = del_pending_extents(trans, extent_root);
 
-       if (ret) {
-               return ret;
-       }
+       if (ret)
+               goto out;
        if (pending_ret) {
-               return pending_ret;
+               ret = pending_ret;
+               goto out;
        }
 
 update_block:
@@ -1827,36 +2117,60 @@ update_block:
                       ins->objectid, ins->offset);
                BUG();
        }
-       return 0;
+out:
+       return ret;
 }
 
+int btrfs_alloc_reserved_extent(struct btrfs_trans_handle *trans,
+                               struct btrfs_root *root,
+                               u64 root_objectid, u64 ref_generation,
+                               u64 owner, u64 owner_offset,
+                               struct btrfs_key *ins)
+{
+       int ret;
+       maybe_lock_mutex(root);
+       ret = __btrfs_alloc_reserved_extent(trans, root, root_objectid,
+                                           ref_generation, owner,
+                                           owner_offset, ins);
+       maybe_unlock_mutex(root);
+       return ret;
+}
 /*
- * helper function to allocate a block for a given tree
- * returns the tree buffer or NULL.
+ * finds a free extent and does all the dirty work required for allocation
+ * returns the key for the extent through ins, and a tree buffer for
+ * the first block of the extent through buf.
+ *
+ * returns 0 if everything worked, non-zero otherwise.
  */
-struct extent_buffer *btrfs_alloc_free_block(struct btrfs_trans_handle *trans,
-                                            struct btrfs_root *root,
-                                            u32 blocksize,
-                                            u64 root_objectid, u64 hint,
-                                            u64 empty_size)
+int btrfs_alloc_extent(struct btrfs_trans_handle *trans,
+                      struct btrfs_root *root,
+                      u64 num_bytes, u64 min_alloc_size,
+                      u64 root_objectid, u64 ref_generation,
+                      u64 owner, u64 owner_offset,
+                      u64 empty_size, u64 hint_byte,
+                      u64 search_end, struct btrfs_key *ins, u64 data)
 {
-       u64 ref_generation;
+       int ret;
 
-       if (root->ref_cows)
-               ref_generation = trans->transid;
-       else
-               ref_generation = 0;
+       maybe_lock_mutex(root);
 
+       ret = __btrfs_reserve_extent(trans, root, num_bytes,
+                                    min_alloc_size, empty_size, hint_byte,
+                                    search_end, ins, data);
+       BUG_ON(ret);
+       ret = __btrfs_alloc_reserved_extent(trans, root, root_objectid,
+                                           ref_generation, owner,
+                                           owner_offset, ins);
+       BUG_ON(ret);
 
-       return __btrfs_alloc_free_block(trans, root, blocksize, root_objectid,
-                                       ref_generation, 0, 0, hint, empty_size);
+       maybe_unlock_mutex(root);
+       return ret;
 }
-
 /*
  * helper function to allocate a block for a given tree
  * returns the tree buffer or NULL.
  */
-struct extent_buffer *__btrfs_alloc_free_block(struct btrfs_trans_handle *trans,
+struct extent_buffer *btrfs_alloc_free_block(struct btrfs_trans_handle *trans,
                                             struct btrfs_root *root,
                                             u32 blocksize,
                                             u64 root_objectid,
@@ -1886,6 +2200,7 @@ struct extent_buffer *__btrfs_alloc_free_block(struct btrfs_trans_handle *trans,
                return ERR_PTR(-ENOMEM);
        }
        btrfs_set_header_generation(buf, trans->transid);
+       btrfs_tree_lock(buf);
        clean_tree_block(trans, root, buf);
        btrfs_set_buffer_uptodate(buf);
 
@@ -1896,8 +2211,6 @@ struct extent_buffer *__btrfs_alloc_free_block(struct btrfs_trans_handle *trans,
 
        set_extent_dirty(&trans->transaction->dirty_pages, buf->start,
                         buf->start + buf->len - 1, GFP_NOFS);
-       if (!btrfs_test_opt(root, SSD))
-               btrfs_set_buffer_defrag(buf);
        trans->blocks_used++;
        return buf;
 }
@@ -1919,8 +2232,11 @@ static int noinline drop_leaf_ref(struct btrfs_trans_handle *trans,
        leaf_owner = btrfs_header_owner(leaf);
        leaf_generation = btrfs_header_generation(leaf);
 
+       mutex_unlock(&root->fs_info->alloc_mutex);
+
        for (i = 0; i < nritems; i++) {
                u64 disk_bytenr;
+               cond_resched();
 
                btrfs_item_key_to_cpu(leaf, &key, i);
                if (btrfs_key_type(&key) != BTRFS_EXTENT_DATA_KEY)
@@ -1936,12 +2252,17 @@ static int noinline drop_leaf_ref(struct btrfs_trans_handle *trans,
                disk_bytenr = btrfs_file_extent_disk_bytenr(leaf, fi);
                if (disk_bytenr == 0)
                        continue;
-               ret = btrfs_free_extent(trans, root, disk_bytenr,
+
+               mutex_lock(&root->fs_info->alloc_mutex);
+               ret = __btrfs_free_extent(trans, root, disk_bytenr,
                                btrfs_file_extent_disk_num_bytes(leaf, fi),
                                leaf_owner, leaf_generation,
                                key.objectid, key.offset, 0);
+               mutex_unlock(&root->fs_info->alloc_mutex);
                BUG_ON(ret);
        }
+
+       mutex_lock(&root->fs_info->alloc_mutex);
        return 0;
 }
 
@@ -1981,16 +2302,30 @@ static void noinline reada_walk_down(struct btrfs_root *root,
                                continue;
                        }
                }
-               mutex_unlock(&root->fs_info->fs_mutex);
-               ret = readahead_tree_block(root, bytenr, blocksize);
+               ret = readahead_tree_block(root, bytenr, blocksize,
+                                          btrfs_node_ptr_generation(node, i));
                last = bytenr + blocksize;
                cond_resched();
-               mutex_lock(&root->fs_info->fs_mutex);
                if (ret)
                        break;
        }
 }
 
+/*
+ * we want to avoid as much random IO as we can with the alloc mutex
+ * held, so drop the lock and do the lookup, then do it again with the
+ * lock held.
+ */
+int drop_snap_lookup_refcount(struct btrfs_root *root, u64 start, u64 len,
+                             u32 *refs)
+{
+       mutex_unlock(&root->fs_info->alloc_mutex);
+       lookup_extent_ref(NULL, root, start, len, refs);
+       cond_resched();
+       mutex_lock(&root->fs_info->alloc_mutex);
+       return lookup_extent_ref(NULL, root, start, len, refs);
+}
+
 /*
  * helper function for drop_snapshot, this walks down the tree dropping ref
  * counts as it goes.
@@ -2002,6 +2337,7 @@ static int noinline walk_down_tree(struct btrfs_trans_handle *trans,
        u64 root_owner;
        u64 root_gen;
        u64 bytenr;
+       u64 ptr_gen;
        struct extent_buffer *next;
        struct extent_buffer *cur;
        struct extent_buffer *parent;
@@ -2009,10 +2345,11 @@ static int noinline walk_down_tree(struct btrfs_trans_handle *trans,
        int ret;
        u32 refs;
 
+       mutex_lock(&root->fs_info->alloc_mutex);
+
        WARN_ON(*level < 0);
        WARN_ON(*level >= BTRFS_MAX_LEVEL);
-       ret = lookup_extent_ref(trans, root,
-                               path->nodes[*level]->start,
+       ret = drop_snap_lookup_refcount(root, path->nodes[*level]->start,
                                path->nodes[*level]->len, &refs);
        BUG_ON(ret);
        if (refs > 1)
@@ -2038,32 +2375,38 @@ static int noinline walk_down_tree(struct btrfs_trans_handle *trans,
                        break;
                }
                bytenr = btrfs_node_blockptr(cur, path->slots[*level]);
+               ptr_gen = btrfs_node_ptr_generation(cur, path->slots[*level]);
                blocksize = btrfs_level_size(root, *level - 1);
-               ret = lookup_extent_ref(trans, root, bytenr, blocksize, &refs);
+
+               ret = drop_snap_lookup_refcount(root, bytenr, blocksize, &refs);
                BUG_ON(ret);
                if (refs != 1) {
                        parent = path->nodes[*level];
                        root_owner = btrfs_header_owner(parent);
                        root_gen = btrfs_header_generation(parent);
                        path->slots[*level]++;
-                       ret = btrfs_free_extent(trans, root, bytenr,
+                       ret = __btrfs_free_extent(trans, root, bytenr,
                                                blocksize, root_owner,
                                                root_gen, 0, 0, 1);
                        BUG_ON(ret);
                        continue;
                }
                next = btrfs_find_tree_block(root, bytenr, blocksize);
-               if (!next || !btrfs_buffer_uptodate(next)) {
+               if (!next || !btrfs_buffer_uptodate(next, ptr_gen)) {
                        free_extent_buffer(next);
-                       reada_walk_down(root, cur, path->slots[*level]);
+                       mutex_unlock(&root->fs_info->alloc_mutex);
 
-                       mutex_unlock(&root->fs_info->fs_mutex);
-                       next = read_tree_block(root, bytenr, blocksize);
-                       mutex_lock(&root->fs_info->fs_mutex);
+                       if (path->slots[*level] == 0)
+                               reada_walk_down(root, cur, path->slots[*level]);
+
+                       next = read_tree_block(root, bytenr, blocksize,
+                                              ptr_gen);
+                       cond_resched();
+                       mutex_lock(&root->fs_info->alloc_mutex);
 
                        /* we've dropped the lock, double check */
-                       ret = lookup_extent_ref(trans, root, bytenr,
-                                               blocksize, &refs);
+                       ret = lookup_extent_ref(NULL, root, bytenr, blocksize,
+                                               &refs);
                        BUG_ON(ret);
                        if (refs != 1) {
                                parent = path->nodes[*level];
@@ -2072,15 +2415,13 @@ static int noinline walk_down_tree(struct btrfs_trans_handle *trans,
 
                                path->slots[*level]++;
                                free_extent_buffer(next);
-                               ret = btrfs_free_extent(trans, root, bytenr,
+                               ret = __btrfs_free_extent(trans, root, bytenr,
                                                        blocksize,
                                                        root_owner,
                                                        root_gen, 0, 0, 1);
                                BUG_ON(ret);
                                continue;
                        }
-               } else if (next) {
-                       btrfs_verify_block_csum(root, next);
                }
                WARN_ON(*level <= 0);
                if (path->nodes[*level-1])
@@ -2102,13 +2443,15 @@ out:
        }
 
        root_gen = btrfs_header_generation(parent);
-       ret = btrfs_free_extent(trans, root, path->nodes[*level]->start,
+       ret = __btrfs_free_extent(trans, root, path->nodes[*level]->start,
                                path->nodes[*level]->len,
                                root_owner, root_gen, 0, 0, 1);
        free_extent_buffer(path->nodes[*level]);
        path->nodes[*level] = NULL;
        *level += 1;
        BUG_ON(ret);
+       mutex_unlock(&root->fs_info->alloc_mutex);
+       cond_resched();
        return 0;
 }
 
@@ -2182,6 +2525,7 @@ int btrfs_drop_snapshot(struct btrfs_trans_handle *trans, struct btrfs_root
        int orig_level;
        struct btrfs_root_item *root_item = &root->root_item;
 
+       WARN_ON(!mutex_is_locked(&root->fs_info->drop_mutex));
        path = btrfs_alloc_path();
        BUG_ON(!path);
 
@@ -2208,6 +2552,16 @@ int btrfs_drop_snapshot(struct btrfs_trans_handle *trans, struct btrfs_root
                btrfs_node_key(node, &found_key, path->slots[level]);
                WARN_ON(memcmp(&found_key, &root_item->drop_progress,
                               sizeof(found_key)));
+               /*
+                * unlock our path, this is safe because only this
+                * function is allowed to delete this snapshot
+                */
+               for (i = 0; i < BTRFS_MAX_LEVEL; i++) {
+                       if (path->nodes[i] && path->locks[i]) {
+                               path->locks[i] = 0;
+                               btrfs_tree_unlock(path->nodes[i]);
+                       }
+               }
        }
        while(1) {
                wret = walk_down_tree(trans, root, path, &level);
@@ -2221,8 +2575,10 @@ int btrfs_drop_snapshot(struct btrfs_trans_handle *trans, struct btrfs_root
                        break;
                if (wret < 0)
                        ret = wret;
-               ret = -EAGAIN;
-               break;
+               if (trans->transaction->in_commit) {
+                       ret = -EAGAIN;
+                       break;
+               }
        }
        for (i = 0; i <= orig_level; i++) {
                if (path->nodes[i]) {
@@ -2241,6 +2597,8 @@ int btrfs_free_block_groups(struct btrfs_fs_info *info)
        u64 end;
        u64 ptr;
        int ret;
+
+       mutex_lock(&info->alloc_mutex);
        while(1) {
                ret = find_first_extent_bit(&info->block_group_cache, 0,
                                            &start, &end, (unsigned int)-1);
@@ -2260,21 +2618,29 @@ int btrfs_free_block_groups(struct btrfs_fs_info *info)
                clear_extent_dirty(&info->free_space_cache, start,
                                   end, GFP_NOFS);
        }
+       mutex_unlock(&info->alloc_mutex);
        return 0;
 }
 
+static unsigned long calc_ra(unsigned long start, unsigned long last,
+                            unsigned long nr)
+{
+       return min(last, start + nr - 1);
+}
+
 static int noinline relocate_inode_pages(struct inode *inode, u64 start,
                                         u64 len)
 {
        u64 page_start;
        u64 page_end;
-       u64 delalloc_start;
-       u64 existing_delalloc;
        unsigned long last_index;
        unsigned long i;
        struct page *page;
        struct extent_io_tree *io_tree = &BTRFS_I(inode)->io_tree;
        struct file_ra_state *ra;
+       unsigned long total_read = 0;
+       unsigned long ra_pages;
+       struct btrfs_trans_handle *trans;
 
        ra = kzalloc(sizeof(*ra), GFP_NOFS);
 
@@ -2282,14 +2648,23 @@ static int noinline relocate_inode_pages(struct inode *inode, u64 start,
        i = start >> PAGE_CACHE_SHIFT;
        last_index = (start + len - 1) >> PAGE_CACHE_SHIFT;
 
+       ra_pages = BTRFS_I(inode)->root->fs_info->bdi.ra_pages;
+
        file_ra_state_init(ra, inode->i_mapping);
-       btrfs_force_ra(inode->i_mapping, ra, NULL, i, last_index);
-       kfree(ra);
 
        for (; i <= last_index; i++) {
+               if (total_read % ra_pages == 0) {
+                       btrfs_force_ra(inode->i_mapping, ra, NULL, i,
+                                      calc_ra(i, last_index, ra_pages));
+               }
+               total_read++;
+               if (((u64)i << PAGE_CACHE_SHIFT) > inode->i_size)
+                       goto truncate_racing;
+
                page = grab_cache_page(inode->i_mapping, i);
-               if (!page)
+               if (!page) {
                        goto out_unlock;
+               }
                if (!PageUptodate(page)) {
                        btrfs_readpage(NULL, page);
                        lock_page(page);
@@ -2299,28 +2674,116 @@ static int noinline relocate_inode_pages(struct inode *inode, u64 start,
                                goto out_unlock;
                        }
                }
+#if LINUX_VERSION_CODE <= KERNEL_VERSION(2,6,18)
+               ClearPageDirty(page);
+#else
+               cancel_dirty_page(page, PAGE_CACHE_SIZE);
+#endif
+               wait_on_page_writeback(page);
+               set_page_extent_mapped(page);
                page_start = (u64)page->index << PAGE_CACHE_SHIFT;
                page_end = page_start + PAGE_CACHE_SIZE - 1;
 
                lock_extent(io_tree, page_start, page_end, GFP_NOFS);
 
-               delalloc_start = page_start;
-               existing_delalloc = count_range_bits(io_tree,
-                                            &delalloc_start, page_end,
-                                            PAGE_CACHE_SIZE, EXTENT_DELALLOC);
-
                set_extent_delalloc(io_tree, page_start,
                                    page_end, GFP_NOFS);
+               set_page_dirty(page);
 
                unlock_extent(io_tree, page_start, page_end, GFP_NOFS);
-               set_page_dirty(page);
                unlock_page(page);
                page_cache_release(page);
        }
+       balance_dirty_pages_ratelimited_nr(inode->i_mapping,
+                                          total_read);
 
 out_unlock:
+       kfree(ra);
+       trans = btrfs_start_transaction(BTRFS_I(inode)->root, 1);
+       if (trans) {
+               btrfs_end_transaction(trans, BTRFS_I(inode)->root);
+               mark_inode_dirty(inode);
+       }
        mutex_unlock(&inode->i_mutex);
        return 0;
+
+truncate_racing:
+       vmtruncate(inode, inode->i_size);
+       balance_dirty_pages_ratelimited_nr(inode->i_mapping,
+                                          total_read);
+       goto out_unlock;
+}
+
+/*
+ * The back references tell us which tree holds a ref on a block,
+ * but it is possible for the tree root field in the reference to
+ * reflect the original root before a snapshot was made.  In this
+ * case we should search through all the children of a given root
+ * to find potential holders of references on a block.
+ *
+ * Instead, we do something a little less fancy and just search
+ * all the roots for a given key/block combination.
+ */
+static int find_root_for_ref(struct btrfs_root *root,
+                            struct btrfs_path *path,
+                            struct btrfs_key *key0,
+                            int level,
+                            int file_key,
+                            struct btrfs_root **found_root,
+                            u64 bytenr)
+{
+       struct btrfs_key root_location;
+       struct btrfs_root *cur_root = *found_root;
+       struct btrfs_file_extent_item *file_extent;
+       u64 root_search_start = BTRFS_FS_TREE_OBJECTID;
+       u64 found_bytenr;
+       int ret;
+
+       root_location.offset = (u64)-1;
+       root_location.type = BTRFS_ROOT_ITEM_KEY;
+       path->lowest_level = level;
+       path->reada = 0;
+       while(1) {
+               ret = btrfs_search_slot(NULL, cur_root, key0, path, 0, 0);
+               found_bytenr = 0;
+               if (ret == 0 && file_key) {
+                       struct extent_buffer *leaf = path->nodes[0];
+                       file_extent = btrfs_item_ptr(leaf, path->slots[0],
+                                            struct btrfs_file_extent_item);
+                       if (btrfs_file_extent_type(leaf, file_extent) ==
+                           BTRFS_FILE_EXTENT_REG) {
+                               found_bytenr =
+                                       btrfs_file_extent_disk_bytenr(leaf,
+                                                              file_extent);
+                      }
+               } else if (!file_key) {
+                       if (path->nodes[level])
+                               found_bytenr = path->nodes[level]->start;
+               }
+
+               btrfs_release_path(cur_root, path);
+
+               if (found_bytenr == bytenr) {
+                       *found_root = cur_root;
+                       ret = 0;
+                       goto out;
+               }
+               ret = btrfs_search_root(root->fs_info->tree_root,
+                                       root_search_start, &root_search_start);
+               if (ret)
+                       break;
+
+               root_location.objectid = root_search_start;
+               cur_root = btrfs_read_fs_root_no_name(root->fs_info,
+                                                     &root_location);
+               if (!cur_root) {
+                       ret = 1;
+                       break;
+               }
+       }
+out:
+       path->lowest_level = 0;
+       return ret;
 }
 
 /*
@@ -2328,17 +2791,25 @@ out_unlock:
  */
 static int noinline relocate_one_reference(struct btrfs_root *extent_root,
                                  struct btrfs_path *path,
-                                 struct btrfs_key *extent_key)
+                                 struct btrfs_key *extent_key,
+                                 u64 *last_file_objectid,
+                                 u64 *last_file_offset,
+                                 u64 *last_file_root,
+                                 u64 last_extent)
 {
        struct inode *inode;
        struct btrfs_root *found_root;
-       struct btrfs_key *root_location;
+       struct btrfs_key root_location;
+       struct btrfs_key found_key;
        struct btrfs_extent_ref *ref;
        u64 ref_root;
        u64 ref_gen;
        u64 ref_objectid;
        u64 ref_offset;
        int ret;
+       int level;
+
+       WARN_ON(!mutex_is_locked(&extent_root->fs_info->alloc_mutex));
 
        ref = btrfs_item_ptr(path->nodes[0], path->slots[0],
                             struct btrfs_extent_ref);
@@ -2348,21 +2819,43 @@ static int noinline relocate_one_reference(struct btrfs_root *extent_root,
        ref_offset = btrfs_ref_offset(path->nodes[0], ref);
        btrfs_release_path(extent_root, path);
 
-       root_location = kmalloc(sizeof(*root_location), GFP_NOFS);
-       root_location->objectid = ref_root;
+       root_location.objectid = ref_root;
        if (ref_gen == 0)
-               root_location->offset = 0;
+               root_location.offset = 0;
        else
-               root_location->offset = (u64)-1;
-       root_location->type = BTRFS_ROOT_ITEM_KEY;
+               root_location.offset = (u64)-1;
+       root_location.type = BTRFS_ROOT_ITEM_KEY;
 
        found_root = btrfs_read_fs_root_no_name(extent_root->fs_info,
-                                               root_location);
+                                               &root_location);
        BUG_ON(!found_root);
-       kfree(root_location);
+       mutex_unlock(&extent_root->fs_info->alloc_mutex);
 
        if (ref_objectid >= BTRFS_FIRST_FREE_OBJECTID) {
-               mutex_unlock(&extent_root->fs_info->fs_mutex);
+               found_key.objectid = ref_objectid;
+               found_key.type = BTRFS_EXTENT_DATA_KEY;
+               found_key.offset = ref_offset;
+               level = 0;
+
+               if (last_extent == extent_key->objectid &&
+                   *last_file_objectid == ref_objectid &&
+                   *last_file_offset == ref_offset &&
+                   *last_file_root == ref_root)
+                       goto out;
+
+               ret = find_root_for_ref(extent_root, path, &found_key,
+                                       level, 1, &found_root,
+                                       extent_key->objectid);
+
+               if (ret)
+                       goto out;
+
+               if (last_extent == extent_key->objectid &&
+                   *last_file_objectid == ref_objectid &&
+                   *last_file_offset == ref_offset &&
+                   *last_file_root == ref_root)
+                       goto out;
+
                inode = btrfs_iget_locked(extent_root->fs_info->sb,
                                          ref_objectid, found_root);
                if (inode->i_state & I_NEW) {
@@ -2378,25 +2871,23 @@ static int noinline relocate_one_reference(struct btrfs_root *extent_root,
                /* this can happen if the reference is not against
                 * the latest version of the tree root
                 */
-               if (is_bad_inode(inode)) {
-                       mutex_lock(&extent_root->fs_info->fs_mutex);
+               if (is_bad_inode(inode))
                        goto out;
-               }
+
+               *last_file_objectid = inode->i_ino;
+               *last_file_root = found_root->root_key.objectid;
+               *last_file_offset = ref_offset;
+
                relocate_inode_pages(inode, ref_offset, extent_key->offset);
-               /* FIXME, data=ordered will help get rid of this */
-               filemap_fdatawrite(inode->i_mapping);
                iput(inode);
-               mutex_lock(&extent_root->fs_info->fs_mutex);
        } else {
                struct btrfs_trans_handle *trans;
-               struct btrfs_key found_key;
                struct extent_buffer *eb;
-               int level;
-               int i;
+               int needs_lock = 0;
 
-               trans = btrfs_start_transaction(found_root, 1);
                eb = read_tree_block(found_root, extent_key->objectid,
-                                    extent_key->offset);
+                                    extent_key->offset, 0);
+               btrfs_tree_lock(eb);
                level = btrfs_header_level(eb);
 
                if (level == 0)
@@ -2404,27 +2895,74 @@ static int noinline relocate_one_reference(struct btrfs_root *extent_root,
                else
                        btrfs_node_key_to_cpu(eb, &found_key, 0);
 
+               btrfs_tree_unlock(eb);
                free_extent_buffer(eb);
 
+               ret = find_root_for_ref(extent_root, path, &found_key,
+                                       level, 0, &found_root,
+                                       extent_key->objectid);
+
+               if (ret)
+                       goto out;
+
+               /*
+                * right here almost anything could happen to our key,
+                * but that's ok.  The cow below will either relocate it
+                * or someone else will have relocated it.  Either way,
+                * it is in a different spot than it was before and
+                * we're happy.
+                */
+
+               trans = btrfs_start_transaction(found_root, 1);
+
+               if (found_root == extent_root->fs_info->extent_root ||
+                   found_root == extent_root->fs_info->chunk_root ||
+                   found_root == extent_root->fs_info->dev_root) {
+                       needs_lock = 1;
+                       mutex_lock(&extent_root->fs_info->alloc_mutex);
+               }
+
                path->lowest_level = level;
                path->reada = 2;
                ret = btrfs_search_slot(trans, found_root, &found_key, path,
                                        0, 1);
                path->lowest_level = 0;
-               for (i = level; i < BTRFS_MAX_LEVEL; i++) {
-                       if (!path->nodes[i])
-                               break;
-                       free_extent_buffer(path->nodes[i]);
-                       path->nodes[i] = NULL;
-               }
                btrfs_release_path(found_root, path);
+
+               if (found_root == found_root->fs_info->extent_root)
+                       btrfs_extent_post_op(trans, found_root);
+               if (needs_lock)
+                       mutex_unlock(&extent_root->fs_info->alloc_mutex);
+
                btrfs_end_transaction(trans, found_root);
-       }
 
+       }
 out:
+       mutex_lock(&extent_root->fs_info->alloc_mutex);
        return 0;
 }
 
+static int noinline del_extent_zero(struct btrfs_root *extent_root,
+                                   struct btrfs_path *path,
+                                   struct btrfs_key *extent_key)
+{
+       int ret;
+       struct btrfs_trans_handle *trans;
+
+       trans = btrfs_start_transaction(extent_root, 1);
+       ret = btrfs_search_slot(trans, extent_root, extent_key, path, -1, 1);
+       if (ret > 0) {
+               ret = -EIO;
+               goto out;
+       }
+       if (ret < 0)
+               goto out;
+       ret = btrfs_del_item(trans, extent_root, path);
+out:
+       btrfs_end_transaction(trans, extent_root);
+       return ret;
+}
+
 static int noinline relocate_one_extent(struct btrfs_root *extent_root,
                                        struct btrfs_path *path,
                                        struct btrfs_key *extent_key)
@@ -2432,10 +2970,18 @@ static int noinline relocate_one_extent(struct btrfs_root *extent_root,
        struct btrfs_key key;
        struct btrfs_key found_key;
        struct extent_buffer *leaf;
+       u64 last_file_objectid = 0;
+       u64 last_file_root = 0;
+       u64 last_file_offset = (u64)-1;
+       u64 last_extent = 0;
        u32 nritems;
        u32 item_size;
        int ret = 0;
 
+       if (extent_key->objectid == 0) {
+               ret = del_extent_zero(extent_root, path, extent_key);
+               goto out;
+       }
        key.objectid = extent_key->objectid;
        key.type = BTRFS_EXTENT_REF_KEY;
        key.offset = 0;
@@ -2449,22 +2995,36 @@ static int noinline relocate_one_extent(struct btrfs_root *extent_root,
                ret = 0;
                leaf = path->nodes[0];
                nritems = btrfs_header_nritems(leaf);
-               if (path->slots[0] == nritems)
-                       goto out;
+               if (path->slots[0] == nritems) {
+                       ret = btrfs_next_leaf(extent_root, path);
+                       if (ret > 0) {
+                               ret = 0;
+                               goto out;
+                       }
+                       if (ret < 0)
+                               goto out;
+                       leaf = path->nodes[0];
+               }
 
                btrfs_item_key_to_cpu(leaf, &found_key, path->slots[0]);
-               if (found_key.objectid != extent_key->objectid)
+               if (found_key.objectid != extent_key->objectid) {
                        break;
+               }
 
-               if (found_key.type != BTRFS_EXTENT_REF_KEY)
+               if (found_key.type != BTRFS_EXTENT_REF_KEY) {
                        break;
+               }
 
                key.offset = found_key.offset + 1;
                item_size = btrfs_item_size_nr(leaf, path->slots[0]);
 
-               ret = relocate_one_reference(extent_root, path, extent_key);
+               ret = relocate_one_reference(extent_root, path, extent_key,
+                                            &last_file_objectid,
+                                            &last_file_offset,
+                                            &last_file_root, last_extent);
                if (ret)
                        goto out;
+               last_extent = extent_key->objectid;
        }
        ret = 0;
 out:
@@ -2472,6 +3032,82 @@ out:
        return ret;
 }
 
+static u64 update_block_group_flags(struct btrfs_root *root, u64 flags)
+{
+       u64 num_devices;
+       u64 stripped = BTRFS_BLOCK_GROUP_RAID0 |
+               BTRFS_BLOCK_GROUP_RAID1 | BTRFS_BLOCK_GROUP_RAID10;
+
+       num_devices = root->fs_info->fs_devices->num_devices;
+       if (num_devices == 1) {
+               stripped |= BTRFS_BLOCK_GROUP_DUP;
+               stripped = flags & ~stripped;
+
+               /* turn raid0 into single device chunks */
+               if (flags & BTRFS_BLOCK_GROUP_RAID0)
+                       return stripped;
+
+               /* turn mirroring into duplication */
+               if (flags & (BTRFS_BLOCK_GROUP_RAID1 |
+                            BTRFS_BLOCK_GROUP_RAID10))
+                       return stripped | BTRFS_BLOCK_GROUP_DUP;
+               return flags;
+       } else {
+               /* they already had raid on here, just return */
+               if (flags & stripped)
+                       return flags;
+
+               stripped |= BTRFS_BLOCK_GROUP_DUP;
+               stripped = flags & ~stripped;
+
+               /* switch duplicated blocks with raid1 */
+               if (flags & BTRFS_BLOCK_GROUP_DUP)
+                       return stripped | BTRFS_BLOCK_GROUP_RAID1;
+
+               /* turn single device chunks into raid0 */
+               return stripped | BTRFS_BLOCK_GROUP_RAID0;
+       }
+       return flags;
+}
+
+int __alloc_chunk_for_shrink(struct btrfs_root *root,
+                    struct btrfs_block_group_cache *shrink_block_group,
+                    int force)
+{
+       struct btrfs_trans_handle *trans;
+       u64 new_alloc_flags;
+       u64 calc;
+
+       spin_lock(&shrink_block_group->lock);
+       if (btrfs_block_group_used(&shrink_block_group->item) > 0) {
+               spin_unlock(&shrink_block_group->lock);
+               mutex_unlock(&root->fs_info->alloc_mutex);
+
+               trans = btrfs_start_transaction(root, 1);
+               mutex_lock(&root->fs_info->alloc_mutex);
+               spin_lock(&shrink_block_group->lock);
+
+               new_alloc_flags = update_block_group_flags(root,
+                                                  shrink_block_group->flags);
+               if (new_alloc_flags != shrink_block_group->flags) {
+                       calc =
+                            btrfs_block_group_used(&shrink_block_group->item);
+               } else {
+                       calc = shrink_block_group->key.offset;
+               }
+               spin_unlock(&shrink_block_group->lock);
+
+               do_chunk_alloc(trans, root->fs_info->extent_root,
+                              calc + 2 * 1024 * 1024, new_alloc_flags, force);
+
+               mutex_unlock(&root->fs_info->alloc_mutex);
+               btrfs_end_transaction(trans, root);
+               mutex_lock(&root->fs_info->alloc_mutex);
+       } else
+               spin_unlock(&shrink_block_group->lock);
+       return 0;
+}
+
 int btrfs_shrink_extent_tree(struct btrfs_root *root, u64 shrink_start)
 {
        struct btrfs_trans_handle *trans;
@@ -2487,30 +3123,34 @@ int btrfs_shrink_extent_tree(struct btrfs_root *root, u64 shrink_start)
        struct extent_buffer *leaf;
        u32 nritems;
        int ret;
-       int progress = 0;
+       int progress;
 
+       mutex_lock(&root->fs_info->alloc_mutex);
        shrink_block_group = btrfs_lookup_block_group(root->fs_info,
                                                      shrink_start);
        BUG_ON(!shrink_block_group);
 
-       shrink_last_byte = shrink_start + shrink_block_group->key.offset;
+       shrink_last_byte = shrink_block_group->key.objectid +
+               shrink_block_group->key.offset;
 
        shrink_block_group->space_info->total_bytes -=
                shrink_block_group->key.offset;
-printk("shrink_extent_tree %Lu -> %Lu type %Lu\n", shrink_start, shrink_last_byte, shrink_block_group->flags);
        path = btrfs_alloc_path();
        root = root->fs_info->extent_root;
        path->reada = 2;
 
+       printk("btrfs relocating block group %llu flags %llu\n",
+              (unsigned long long)shrink_start,
+              (unsigned long long)shrink_block_group->flags);
+
+       __alloc_chunk_for_shrink(root, shrink_block_group, 1);
+
 again:
-       trans = btrfs_start_transaction(root, 1);
-       do_chunk_alloc(trans, root->fs_info->extent_root,
-                       btrfs_block_group_used(&shrink_block_group->item) +
-                       2 * 1024 * 1024, shrink_block_group->flags);
-       btrfs_end_transaction(trans, root);
+
        shrink_block_group->ro = 1;
 
        total_found = 0;
+       progress = 0;
        key.objectid = shrink_start;
        key.offset = 0;
        key.type = 0;
@@ -2540,9 +3180,9 @@ again:
                if (ret < 0)
                        goto out;
 
+next:
                leaf = path->nodes[0];
                nritems = btrfs_header_nritems(leaf);
-next:
                if (path->slots[0] >= nritems) {
                        ret = btrfs_next_leaf(root, path);
                        if (ret < 0)
@@ -2562,9 +3202,7 @@ next:
 
                if (progress && need_resched()) {
                        memcpy(&key, &found_key, sizeof(key));
-                       mutex_unlock(&root->fs_info->fs_mutex);
                        cond_resched();
-                       mutex_lock(&root->fs_info->fs_mutex);
                        btrfs_release_path(root, path);
                        btrfs_search_slot(NULL, root, &key, path, 0, 0);
                        progress = 0;
@@ -2574,6 +3212,8 @@ next:
 
                if (btrfs_key_type(&found_key) != BTRFS_EXTENT_ITEM_KEY ||
                    found_key.objectid + found_key.offset <= cur_byte) {
+                       memcpy(&key, &found_key, sizeof(key));
+                       key.offset++;
                        path->slots[0]++;
                        goto next;
                }
@@ -2583,20 +3223,24 @@ next:
                key.objectid = cur_byte;
                btrfs_release_path(root, path);
                ret = relocate_one_extent(root, path, &found_key);
+               __alloc_chunk_for_shrink(root, shrink_block_group, 0);
        }
 
        btrfs_release_path(root, path);
 
        if (total_found > 0) {
+               printk("btrfs relocate found %llu last extent was %llu\n",
+                      (unsigned long long)total_found,
+                      (unsigned long long)found_key.objectid);
+               mutex_unlock(&root->fs_info->alloc_mutex);
                trans = btrfs_start_transaction(tree_root, 1);
                btrfs_commit_transaction(trans, tree_root);
 
-               mutex_unlock(&root->fs_info->fs_mutex);
                btrfs_clean_old_snapshots(tree_root);
-               mutex_lock(&root->fs_info->fs_mutex);
 
                trans = btrfs_start_transaction(tree_root, 1);
                btrfs_commit_transaction(trans, tree_root);
+               mutex_lock(&root->fs_info->alloc_mutex);
                goto again;
        }
 
@@ -2604,7 +3248,11 @@ next:
         * we've freed all the extents, now remove the block
         * group item from the tree
         */
+       mutex_unlock(&root->fs_info->alloc_mutex);
+
        trans = btrfs_start_transaction(root, 1);
+
+       mutex_lock(&root->fs_info->alloc_mutex);
        memcpy(&key, &shrink_block_group->key, sizeof(key));
 
        ret = btrfs_search_slot(trans, root, &key, path, -1, 1);
@@ -2613,36 +3261,49 @@ next:
        if (ret < 0)
                goto out;
 
-       leaf = path->nodes[0];
-       nritems = btrfs_header_nritems(leaf);
-       btrfs_item_key_to_cpu(leaf, &found_key, path->slots[0]);
-       kfree(shrink_block_group);
-
-       clear_extent_bits(&info->block_group_cache, found_key.objectid,
-                         found_key.objectid + found_key.offset - 1,
+       clear_extent_bits(&info->block_group_cache, key.objectid,
+                         key.objectid + key.offset - 1,
                          (unsigned int)-1, GFP_NOFS);
 
+
+       clear_extent_bits(&info->free_space_cache,
+                          key.objectid, key.objectid + key.offset - 1,
+                          (unsigned int)-1, GFP_NOFS);
+
+       memset(shrink_block_group, 0, sizeof(*shrink_block_group));
+       kfree(shrink_block_group);
+
        btrfs_del_item(trans, root, path);
-       clear_extent_dirty(&info->free_space_cache,
-                          shrink_start, shrink_last_byte - 1,
-                          GFP_NOFS);
+       btrfs_release_path(root, path);
+       mutex_unlock(&root->fs_info->alloc_mutex);
        btrfs_commit_transaction(trans, root);
+
+       mutex_lock(&root->fs_info->alloc_mutex);
+
+       /* the code to unpin extents might set a few bits in the free
+        * space cache for this range again
+        */
+       clear_extent_bits(&info->free_space_cache,
+                          key.objectid, key.objectid + key.offset - 1,
+                          (unsigned int)-1, GFP_NOFS);
 out:
        btrfs_free_path(path);
+       mutex_unlock(&root->fs_info->alloc_mutex);
        return ret;
 }
 
 int find_first_block_group(struct btrfs_root *root, struct btrfs_path *path,
                           struct btrfs_key *key)
 {
-       int ret;
+       int ret = 0;
        struct btrfs_key found_key;
        struct extent_buffer *leaf;
        int slot;
 
        ret = btrfs_search_slot(NULL, root, key, path, 0, 0);
        if (ret < 0)
-               return ret;
+               goto out;
+
        while(1) {
                slot = path->slots[0];
                leaf = path->nodes[0];
@@ -2651,18 +3312,20 @@ int find_first_block_group(struct btrfs_root *root, struct btrfs_path *path,
                        if (ret == 0)
                                continue;
                        if (ret < 0)
-                               goto error;
+                               goto out;
                        break;
                }
                btrfs_item_key_to_cpu(leaf, &found_key, slot);
 
                if (found_key.objectid >= key->objectid &&
-                   found_key.type == BTRFS_BLOCK_GROUP_ITEM_KEY)
-                       return 0;
+                   found_key.type == BTRFS_BLOCK_GROUP_ITEM_KEY) {
+                       ret = 0;
+                       goto out;
+               }
                path->slots[0]++;
        }
        ret = -ENOENT;
-error:
+out:
        return ret;
 }
 
@@ -2688,6 +3351,7 @@ int btrfs_read_block_groups(struct btrfs_root *root)
        if (!path)
                return -ENOMEM;
 
+       mutex_lock(&root->fs_info->alloc_mutex);
        while(1) {
                ret = find_first_block_group(root, path, &key);
                if (ret > 0) {
@@ -2705,6 +3369,7 @@ int btrfs_read_block_groups(struct btrfs_root *root)
                        break;
                }
 
+               spin_lock_init(&cache->lock);
                read_extent_buffer(leaf, &cache->item,
                                   btrfs_item_ptr_offset(leaf, path->slots[0]),
                                   sizeof(cache->item));
@@ -2732,10 +3397,12 @@ int btrfs_read_block_groups(struct btrfs_root *root)
                /* use EXTENT_LOCKED to prevent merging */
                set_extent_bits(block_group_cache, found_key.objectid,
                                found_key.objectid + found_key.offset - 1,
-                               bit | EXTENT_LOCKED, GFP_NOFS);
+                               EXTENT_LOCKED, GFP_NOFS);
                set_state_private(block_group_cache, found_key.objectid,
                                  (unsigned long)cache);
-
+               set_extent_bits(block_group_cache, found_key.objectid,
+                               found_key.objectid + found_key.offset - 1,
+                               bit | EXTENT_LOCKED, GFP_NOFS);
                if (key.objectid >=
                    btrfs_super_total_bytes(&info->super_copy))
                        break;
@@ -2743,6 +3410,7 @@ int btrfs_read_block_groups(struct btrfs_root *root)
        ret = 0;
 error:
        btrfs_free_path(path);
+       mutex_unlock(&root->fs_info->alloc_mutex);
        return ret;
 }
 
@@ -2757,6 +3425,7 @@ int btrfs_make_block_group(struct btrfs_trans_handle *trans,
        struct btrfs_block_group_cache *cache;
        struct extent_io_tree *block_group_cache;
 
+       WARN_ON(!mutex_is_locked(&root->fs_info->alloc_mutex));
        extent_root = root->fs_info->extent_root;
        block_group_cache = &root->fs_info->block_group_cache;
 
@@ -2764,9 +3433,9 @@ int btrfs_make_block_group(struct btrfs_trans_handle *trans,
        BUG_ON(!cache);
        cache->key.objectid = chunk_offset;
        cache->key.offset = size;
-
+       spin_lock_init(&cache->lock);
        btrfs_set_key_type(&cache->key, BTRFS_BLOCK_GROUP_ITEM_KEY);
-       memset(&cache->item, 0, sizeof(cache->item));
+
        btrfs_set_block_group_used(&cache->item, bytes_used);
        btrfs_set_block_group_chunk_objectid(&cache->item, chunk_objectid);
        cache->flags = type;
@@ -2779,10 +3448,13 @@ int btrfs_make_block_group(struct btrfs_trans_handle *trans,
        bit = block_group_state_bits(type);
        set_extent_bits(block_group_cache, chunk_offset,
                        chunk_offset + size - 1,
-                       bit | EXTENT_LOCKED, GFP_NOFS);
-
+                       EXTENT_LOCKED, GFP_NOFS);
        set_state_private(block_group_cache, chunk_offset,
                          (unsigned long)cache);
+       set_extent_bits(block_group_cache, chunk_offset,
+                       chunk_offset + size - 1,
+                       bit | EXTENT_LOCKED, GFP_NOFS);
+
        ret = btrfs_insert_item(trans, extent_root, &cache->key, &cache->item,
                                sizeof(cache->item));
        BUG_ON(ret);
@@ -2791,5 +3463,6 @@ int btrfs_make_block_group(struct btrfs_trans_handle *trans,
        ret = del_pending_extents(trans, extent_root);
        BUG_ON(ret);
        set_avail_alloc_bits(extent_root->fs_info, type);
+
        return 0;
 }