// SPDX-License-Identifier: GPL-2.0-only
/*
 * samples/kmemleak/kmemleak-test.c
 *
 * Copyright (C) 2008 ARM Limited
 * Written by Catalin Marinas <catalin.marinas@arm.com>
 */

#define pr_fmt(fmt) "kmemleak: " fmt

#include <linux/init.h>
#include <linux/kernel.h>
#include <linux/module.h>
#include <linux/slab.h>
#include <linux/vmalloc.h>
#include <linux/list.h>
#include <linux/percpu.h>
#include <linux/fdtable.h>

#include <linux/kmemleak.h>

struct test_node {
	long header[25];
	struct list_head list;
	long footer[25];
};

static LIST_HEAD(test_list);
static DEFINE_PER_CPU(void *, kmemleak_test_pointer);

/*
 * Some very simple testing. This function needs to be extended for
 * proper testing.
 */
static int kmemleak_test_init(void)
{
	struct test_node *elem;
	int i;

	pr_info("Kmemleak testing\n");

	/* make some orphan objects */
	pr_info("kmalloc(32) = 0x%px\n", kmalloc(32, GFP_KERNEL));
	pr_info("kmalloc(32) = 0x%px\n", kmalloc(32, GFP_KERNEL));
	pr_info("kmalloc(1024) = 0x%px\n", kmalloc(1024, GFP_KERNEL));
	pr_info("kmalloc(1024) = 0x%px\n", kmalloc(1024, GFP_KERNEL));
	pr_info("kmalloc(2048) = 0x%px\n", kmalloc(2048, GFP_KERNEL));
	pr_info("kmalloc(2048) = 0x%px\n", kmalloc(2048, GFP_KERNEL));
	pr_info("kmalloc(4096) = 0x%px\n", kmalloc(4096, GFP_KERNEL));
	pr_info("kmalloc(4096) = 0x%px\n", kmalloc(4096, GFP_KERNEL));
#ifndef CONFIG_MODULES
	pr_info("kmem_cache_alloc(files_cachep) = 0x%px\n",
		kmem_cache_alloc(files_cachep, GFP_KERNEL));
	pr_info("kmem_cache_alloc(files_cachep) = 0x%px\n",
		kmem_cache_alloc(files_cachep, GFP_KERNEL));
#endif
	pr_info("vmalloc(64) = 0x%px\n", vmalloc(64));
	pr_info("vmalloc(64) = 0x%px\n", vmalloc(64));
	pr_info("vmalloc(64) = 0x%px\n", vmalloc(64));
	pr_info("vmalloc(64) = 0x%px\n", vmalloc(64));
	pr_info("vmalloc(64) = 0x%px\n", vmalloc(64));

	/*
	 * Add elements to a list. They should only appear as orphan
	 * after the module is removed.
	 */
	for (i = 0; i < 10; i++) {
		elem = kzalloc(sizeof(*elem), GFP_KERNEL);
		pr_info("kzalloc(sizeof(*elem)) = 0x%px\n", elem);
		if (!elem)
			return -ENOMEM;
		INIT_LIST_HEAD(&elem->list);
		list_add_tail(&elem->list, &test_list);
	}

	for_each_possible_cpu(i) {
		per_cpu(kmemleak_test_pointer, i) = kmalloc(129, GFP_KERNEL);
		pr_info("kmalloc(129) = 0x%px\n",
			per_cpu(kmemleak_test_pointer, i));
	}

	pr_info("__alloc_percpu(64, 4) = 0x%px\n", __alloc_percpu(64, 4));

	return 0;
}
module_init(kmemleak_test_init);

static void __exit kmemleak_test_exit(void)
{
	struct test_node *elem, *tmp;

	/*
	 * Remove the list elements without actually freeing the
	 * memory.
	 */
	list_for_each_entry_safe(elem, tmp, &test_list, list)
		list_del(&elem->list);
}
module_exit(kmemleak_test_exit);

MODULE_DESCRIPTION("Sample module to leak memory for kmemleak testing");
MODULE_LICENSE("GPL");
