1 // SPDX-License-Identifier: GPL-2.0
2 /*
3  * Copyright (C) 2013 Fusion IO.  All rights reserved.
4  */
5 
6 #include <linux/fs.h>
7 #include <linux/mount.h>
8 #include <linux/pseudo_fs.h>
9 #include <linux/magic.h>
10 #include "btrfs-tests.h"
11 #include "../ctree.h"
12 #include "../free-space-cache.h"
13 #include "../free-space-tree.h"
14 #include "../transaction.h"
15 #include "../volumes.h"
16 #include "../disk-io.h"
17 #include "../qgroup.h"
18 #include "../block-group.h"
19 #include "../fs.h"
20 
21 static struct vfsmount *test_mnt = NULL;
22 
23 const char *test_error[] = {
24 	[TEST_ALLOC_FS_INFO]	     = "cannot allocate fs_info",
25 	[TEST_ALLOC_ROOT]	     = "cannot allocate root",
26 	[TEST_ALLOC_EXTENT_BUFFER]   = "cannot extent buffer",
27 	[TEST_ALLOC_PATH]	     = "cannot allocate path",
28 	[TEST_ALLOC_INODE]	     = "cannot allocate inode",
29 	[TEST_ALLOC_BLOCK_GROUP]     = "cannot allocate block group",
30 	[TEST_ALLOC_EXTENT_MAP]      = "cannot allocate extent map",
31 };
32 
33 static const struct super_operations btrfs_test_super_ops = {
34 	.alloc_inode	= btrfs_alloc_inode,
35 	.destroy_inode	= btrfs_test_destroy_inode,
36 };
37 
38 
btrfs_test_init_fs_context(struct fs_context * fc)39 static int btrfs_test_init_fs_context(struct fs_context *fc)
40 {
41 	struct pseudo_fs_context *ctx = init_pseudo(fc, BTRFS_TEST_MAGIC);
42 	if (!ctx)
43 		return -ENOMEM;
44 	ctx->ops = &btrfs_test_super_ops;
45 	return 0;
46 }
47 
48 static struct file_system_type test_type = {
49 	.name		= "btrfs_test_fs",
50 	.init_fs_context = btrfs_test_init_fs_context,
51 	.kill_sb	= kill_anon_super,
52 };
53 
btrfs_new_test_inode(void)54 struct inode *btrfs_new_test_inode(void)
55 {
56 	struct inode *inode;
57 
58 	inode = new_inode(test_mnt->mnt_sb);
59 	if (!inode)
60 		return NULL;
61 
62 	inode->i_mode = S_IFREG;
63 	inode->i_ino = BTRFS_FIRST_FREE_OBJECTID;
64 	BTRFS_I(inode)->location.type = BTRFS_INODE_ITEM_KEY;
65 	BTRFS_I(inode)->location.objectid = BTRFS_FIRST_FREE_OBJECTID;
66 	BTRFS_I(inode)->location.offset = 0;
67 	inode_init_owner(&nop_mnt_idmap, inode, NULL, S_IFREG);
68 
69 	return inode;
70 }
71 
btrfs_init_test_fs(void)72 static int btrfs_init_test_fs(void)
73 {
74 	int ret;
75 
76 	ret = register_filesystem(&test_type);
77 	if (ret) {
78 		printk(KERN_ERR "btrfs: cannot register test file system\n");
79 		return ret;
80 	}
81 
82 	test_mnt = kern_mount(&test_type);
83 	if (IS_ERR(test_mnt)) {
84 		printk(KERN_ERR "btrfs: cannot mount test file system\n");
85 		unregister_filesystem(&test_type);
86 		return PTR_ERR(test_mnt);
87 	}
88 	return 0;
89 }
90 
btrfs_destroy_test_fs(void)91 static void btrfs_destroy_test_fs(void)
92 {
93 	kern_unmount(test_mnt);
94 	unregister_filesystem(&test_type);
95 }
96 
btrfs_alloc_dummy_device(struct btrfs_fs_info * fs_info)97 struct btrfs_device *btrfs_alloc_dummy_device(struct btrfs_fs_info *fs_info)
98 {
99 	struct btrfs_device *dev;
100 
101 	dev = kzalloc(sizeof(*dev), GFP_KERNEL);
102 	if (!dev)
103 		return ERR_PTR(-ENOMEM);
104 
105 	extent_io_tree_init(NULL, &dev->alloc_state, 0);
106 	INIT_LIST_HEAD(&dev->dev_list);
107 	list_add(&dev->dev_list, &fs_info->fs_devices->devices);
108 
109 	return dev;
110 }
111 
btrfs_free_dummy_device(struct btrfs_device * dev)112 static void btrfs_free_dummy_device(struct btrfs_device *dev)
113 {
114 	extent_io_tree_release(&dev->alloc_state);
115 	kfree(dev);
116 }
117 
btrfs_alloc_dummy_fs_info(u32 nodesize,u32 sectorsize)118 struct btrfs_fs_info *btrfs_alloc_dummy_fs_info(u32 nodesize, u32 sectorsize)
119 {
120 	struct btrfs_fs_info *fs_info = kzalloc(sizeof(struct btrfs_fs_info),
121 						GFP_KERNEL);
122 
123 	if (!fs_info)
124 		return fs_info;
125 	fs_info->fs_devices = kzalloc(sizeof(struct btrfs_fs_devices),
126 				      GFP_KERNEL);
127 	if (!fs_info->fs_devices) {
128 		kfree(fs_info);
129 		return NULL;
130 	}
131 	INIT_LIST_HEAD(&fs_info->fs_devices->devices);
132 
133 	fs_info->super_copy = kzalloc(sizeof(struct btrfs_super_block),
134 				      GFP_KERNEL);
135 	if (!fs_info->super_copy) {
136 		kfree(fs_info->fs_devices);
137 		kfree(fs_info);
138 		return NULL;
139 	}
140 
141 	btrfs_init_fs_info(fs_info);
142 
143 	fs_info->nodesize = nodesize;
144 	fs_info->sectorsize = sectorsize;
145 	fs_info->sectorsize_bits = ilog2(sectorsize);
146 	set_bit(BTRFS_FS_STATE_DUMMY_FS_INFO, &fs_info->fs_state);
147 
148 	test_mnt->mnt_sb->s_fs_info = fs_info;
149 
150 	return fs_info;
151 }
152 
btrfs_free_dummy_fs_info(struct btrfs_fs_info * fs_info)153 void btrfs_free_dummy_fs_info(struct btrfs_fs_info *fs_info)
154 {
155 	struct radix_tree_iter iter;
156 	void **slot;
157 	struct btrfs_device *dev, *tmp;
158 
159 	if (!fs_info)
160 		return;
161 
162 	if (WARN_ON(!test_bit(BTRFS_FS_STATE_DUMMY_FS_INFO,
163 			      &fs_info->fs_state)))
164 		return;
165 
166 	test_mnt->mnt_sb->s_fs_info = NULL;
167 
168 	spin_lock(&fs_info->buffer_lock);
169 	radix_tree_for_each_slot(slot, &fs_info->buffer_radix, &iter, 0) {
170 		struct extent_buffer *eb;
171 
172 		eb = radix_tree_deref_slot_protected(slot, &fs_info->buffer_lock);
173 		if (!eb)
174 			continue;
175 		/* Shouldn't happen but that kind of thinking creates CVE's */
176 		if (radix_tree_exception(eb)) {
177 			if (radix_tree_deref_retry(eb))
178 				slot = radix_tree_iter_retry(&iter);
179 			continue;
180 		}
181 		slot = radix_tree_iter_resume(slot, &iter);
182 		spin_unlock(&fs_info->buffer_lock);
183 		free_extent_buffer_stale(eb);
184 		spin_lock(&fs_info->buffer_lock);
185 	}
186 	spin_unlock(&fs_info->buffer_lock);
187 
188 	btrfs_mapping_tree_free(&fs_info->mapping_tree);
189 	list_for_each_entry_safe(dev, tmp, &fs_info->fs_devices->devices,
190 				 dev_list) {
191 		btrfs_free_dummy_device(dev);
192 	}
193 	btrfs_free_qgroup_config(fs_info);
194 	btrfs_free_fs_roots(fs_info);
195 	kfree(fs_info->super_copy);
196 	btrfs_check_leaked_roots(fs_info);
197 	btrfs_extent_buffer_leak_debug_check(fs_info);
198 	kfree(fs_info->fs_devices);
199 	kfree(fs_info);
200 }
201 
btrfs_free_dummy_root(struct btrfs_root * root)202 void btrfs_free_dummy_root(struct btrfs_root *root)
203 {
204 	if (IS_ERR_OR_NULL(root))
205 		return;
206 	/* Will be freed by btrfs_free_fs_roots */
207 	if (WARN_ON(test_bit(BTRFS_ROOT_IN_RADIX, &root->state)))
208 		return;
209 	btrfs_global_root_delete(root);
210 	btrfs_put_root(root);
211 }
212 
213 struct btrfs_block_group *
btrfs_alloc_dummy_block_group(struct btrfs_fs_info * fs_info,unsigned long length)214 btrfs_alloc_dummy_block_group(struct btrfs_fs_info *fs_info,
215 			      unsigned long length)
216 {
217 	struct btrfs_block_group *cache;
218 
219 	cache = kzalloc(sizeof(*cache), GFP_KERNEL);
220 	if (!cache)
221 		return NULL;
222 	cache->free_space_ctl = kzalloc(sizeof(*cache->free_space_ctl),
223 					GFP_KERNEL);
224 	if (!cache->free_space_ctl) {
225 		kfree(cache);
226 		return NULL;
227 	}
228 
229 	cache->start = 0;
230 	cache->length = length;
231 	cache->full_stripe_len = fs_info->sectorsize;
232 	cache->fs_info = fs_info;
233 
234 	INIT_LIST_HEAD(&cache->list);
235 	INIT_LIST_HEAD(&cache->cluster_list);
236 	INIT_LIST_HEAD(&cache->bg_list);
237 	btrfs_init_free_space_ctl(cache, cache->free_space_ctl);
238 	mutex_init(&cache->free_space_lock);
239 
240 	return cache;
241 }
242 
btrfs_free_dummy_block_group(struct btrfs_block_group * cache)243 void btrfs_free_dummy_block_group(struct btrfs_block_group *cache)
244 {
245 	if (!cache)
246 		return;
247 	btrfs_remove_free_space_cache(cache);
248 	kfree(cache->free_space_ctl);
249 	kfree(cache);
250 }
251 
btrfs_init_dummy_trans(struct btrfs_trans_handle * trans,struct btrfs_fs_info * fs_info)252 void btrfs_init_dummy_trans(struct btrfs_trans_handle *trans,
253 			    struct btrfs_fs_info *fs_info)
254 {
255 	memset(trans, 0, sizeof(*trans));
256 	trans->transid = 1;
257 	trans->type = __TRANS_DUMMY;
258 	trans->fs_info = fs_info;
259 }
260 
btrfs_run_sanity_tests(void)261 int btrfs_run_sanity_tests(void)
262 {
263 	int ret, i;
264 	u32 sectorsize, nodesize;
265 	u32 test_sectorsize[] = {
266 		PAGE_SIZE,
267 	};
268 	ret = btrfs_init_test_fs();
269 	if (ret)
270 		return ret;
271 	for (i = 0; i < ARRAY_SIZE(test_sectorsize); i++) {
272 		sectorsize = test_sectorsize[i];
273 		for (nodesize = sectorsize;
274 		     nodesize <= BTRFS_MAX_METADATA_BLOCKSIZE;
275 		     nodesize <<= 1) {
276 			pr_info("BTRFS: selftest: sectorsize: %u  nodesize: %u\n",
277 				sectorsize, nodesize);
278 			ret = btrfs_test_free_space_cache(sectorsize, nodesize);
279 			if (ret)
280 				goto out;
281 			ret = btrfs_test_extent_buffer_operations(sectorsize,
282 				nodesize);
283 			if (ret)
284 				goto out;
285 			ret = btrfs_test_extent_io(sectorsize, nodesize);
286 			if (ret)
287 				goto out;
288 			ret = btrfs_test_inodes(sectorsize, nodesize);
289 			if (ret)
290 				goto out;
291 			ret = btrfs_test_qgroups(sectorsize, nodesize);
292 			if (ret)
293 				goto out;
294 			ret = btrfs_test_free_space_tree(sectorsize, nodesize);
295 			if (ret)
296 				goto out;
297 		}
298 	}
299 	ret = btrfs_test_extent_map();
300 
301 out:
302 	btrfs_destroy_test_fs();
303 	return ret;
304 }
305