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
 21static struct vfsmount *test_mnt = NULL;
 22
 23const 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
 33static const struct super_operations btrfs_test_super_ops = {
 34	.alloc_inode	= btrfs_alloc_inode,
 35	.destroy_inode	= btrfs_test_destroy_inode,
 36};
 37
 38
 39static 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
 48static 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
 54struct 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(&init_user_ns, inode, NULL, S_IFREG);
 68
 69	return inode;
 70}
 71
 72static 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
 91static void btrfs_destroy_test_fs(void)
 92{
 93	kern_unmount(test_mnt);
 94	unregister_filesystem(&test_type);
 95}
 96
 97struct 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
112static void btrfs_free_dummy_device(struct btrfs_device *dev)
113{
114	extent_io_tree_release(&dev->alloc_state);
115	kfree(dev);
116}
117
118struct 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
153void 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
202void 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
213struct btrfs_block_group *
214btrfs_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
243void 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
252void 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
261int 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
301out:
302	btrfs_destroy_test_fs();
303	return ret;
304}