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