[linux-2.6-block.git] / mm / mm_init.c

// SPDX-License-Identifier: GPL-2.0-only
/*
 * mm_init.c - Memory initialisation verification and debugging
 *
 * Copyright 2008 IBM Corporation, 2008
 * Author Mel Gorman <mel@csn.ul.ie>
 *
 */
#include <linux/kernel.h>
#include <linux/init.h>
#include <linux/kobject.h>
#include <linux/export.h>
#include <linux/memory.h>
#include <linux/notifier.h>
#include <linux/sched.h>
#include "internal.h"

#ifdef CONFIG_DEBUG_MEMORY_INIT
int __meminitdata mminit_loglevel;

#ifndef SECTIONS_SHIFT
#define SECTIONS_SHIFT	0
#endif

/* The zonelists are simply reported, validation is manual. */
void __init mminit_verify_zonelist(void)
{
	int nid;

	if (mminit_loglevel < MMINIT_VERIFY)
		return;

	for_each_online_node(nid) {
		pg_data_t *pgdat = NODE_DATA(nid);
		struct zone *zone;
		struct zoneref *z;
		struct zonelist *zonelist;
		int i, listid, zoneid;

		BUG_ON(MAX_ZONELISTS > 2);
		for (i = 0; i < MAX_ZONELISTS * MAX_NR_ZONES; i++) {

			/* Identify the zone and nodelist */
			zoneid = i % MAX_NR_ZONES;
			listid = i / MAX_NR_ZONES;
			zonelist = &pgdat->node_zonelists[listid];
			zone = &pgdat->node_zones[zoneid];
			if (!populated_zone(zone))
				continue;

			/* Print information about the zonelist */
			printk(KERN_DEBUG "mminit::zonelist %s %d:%s = ",
				listid > 0 ? "thisnode" : "general", nid,
				zone->name);

			/* Iterate the zonelist */
			for_each_zone_zonelist(zone, z, zonelist, zoneid)
				pr_cont("%d:%s ", zone_to_nid(zone), zone->name);
			pr_cont("\n");
		}
	}
}

void __init mminit_verify_pageflags_layout(void)
{
	int shift, width;
	unsigned long or_mask, add_mask;

	shift = 8 * sizeof(unsigned long);
	width = shift - SECTIONS_WIDTH - NODES_WIDTH - ZONES_WIDTH - LAST_CPUPID_SHIFT;
	mminit_dprintk(MMINIT_TRACE, "pageflags_layout_widths",
		"Section %d Node %d Zone %d Lastcpupid %d Flags %d\n",
		SECTIONS_WIDTH,
		NODES_WIDTH,
		ZONES_WIDTH,
		LAST_CPUPID_WIDTH,
		NR_PAGEFLAGS);
	mminit_dprintk(MMINIT_TRACE, "pageflags_layout_shifts",
		"Section %d Node %d Zone %d Lastcpupid %d\n",
		SECTIONS_SHIFT,
		NODES_SHIFT,
		ZONES_SHIFT,
		LAST_CPUPID_SHIFT);
	mminit_dprintk(MMINIT_TRACE, "pageflags_layout_pgshifts",
		"Section %lu Node %lu Zone %lu Lastcpupid %lu\n",
		(unsigned long)SECTIONS_PGSHIFT,
		(unsigned long)NODES_PGSHIFT,
		(unsigned long)ZONES_PGSHIFT,
		(unsigned long)LAST_CPUPID_PGSHIFT);
	mminit_dprintk(MMINIT_TRACE, "pageflags_layout_nodezoneid",
		"Node/Zone ID: %lu -> %lu\n",
		(unsigned long)(ZONEID_PGOFF + ZONEID_SHIFT),
		(unsigned long)ZONEID_PGOFF);
	mminit_dprintk(MMINIT_TRACE, "pageflags_layout_usage",
		"location: %d -> %d layout %d -> %d unused %d -> %d page-flags\n",
		shift, width, width, NR_PAGEFLAGS, NR_PAGEFLAGS, 0);
#ifdef NODE_NOT_IN_PAGE_FLAGS
	mminit_dprintk(MMINIT_TRACE, "pageflags_layout_nodeflags",
		"Node not in page flags");
#endif
#ifdef LAST_CPUPID_NOT_IN_PAGE_FLAGS
	mminit_dprintk(MMINIT_TRACE, "pageflags_layout_nodeflags",
		"Last cpupid not in page flags");
#endif

	if (SECTIONS_WIDTH) {
		shift -= SECTIONS_WIDTH;
		BUG_ON(shift != SECTIONS_PGSHIFT);
	}
	if (NODES_WIDTH) {
		shift -= NODES_WIDTH;
		BUG_ON(shift != NODES_PGSHIFT);
	}
	if (ZONES_WIDTH) {
		shift -= ZONES_WIDTH;
		BUG_ON(shift != ZONES_PGSHIFT);
	}

	/* Check for bitmask overlaps */
	or_mask = (ZONES_MASK << ZONES_PGSHIFT) |
			(NODES_MASK << NODES_PGSHIFT) |
			(SECTIONS_MASK << SECTIONS_PGSHIFT);
	add_mask = (ZONES_MASK << ZONES_PGSHIFT) +
			(NODES_MASK << NODES_PGSHIFT) +
			(SECTIONS_MASK << SECTIONS_PGSHIFT);
	BUG_ON(or_mask != add_mask);
}

static __init int set_mminit_loglevel(char *str)
{
	get_option(&str, &mminit_loglevel);
	return 0;
}
early_param("mminit_loglevel", set_mminit_loglevel);
#endif /* CONFIG_DEBUG_MEMORY_INIT */

struct kobject *mm_kobj;
EXPORT_SYMBOL_GPL(mm_kobj);

#ifdef CONFIG_SMP
s32 vm_committed_as_batch = 32;

static void __meminit mm_compute_batch(void)
{
	u64 memsized_batch;
	s32 nr = num_present_cpus();
	s32 batch = max_t(s32, nr*2, 32);

	/* batch size set to 0.4% of (total memory/#cpus), or max int32 */
	memsized_batch = min_t(u64, (totalram_pages()/nr)/256, 0x7fffffff);

	vm_committed_as_batch = max_t(s32, memsized_batch, batch);
}

static int __meminit mm_compute_batch_notifier(struct notifier_block *self,
					unsigned long action, void *arg)
{
	switch (action) {
	case MEM_ONLINE:
	case MEM_OFFLINE:
		mm_compute_batch();
	default:
		break;
	}
	return NOTIFY_OK;
}

static struct notifier_block compute_batch_nb __meminitdata = {
	.notifier_call = mm_compute_batch_notifier,
	.priority = IPC_CALLBACK_PRI, /* use lowest priority */
};

static int __init mm_compute_batch_init(void)
{
	mm_compute_batch();
	register_hotmemory_notifier(&compute_batch_nb);

	return 0;
}

__initcall(mm_compute_batch_init);

#endif

static int __init mm_sysfs_init(void)
{
	mm_kobj = kobject_create_and_add("mm", kernel_kobj);
	if (!mm_kobj)
		return -ENOMEM;

	return 0;
}
postcore_initcall(mm_sysfs_init);
Commit	Line	Data
	1	// SPDX-License-Identifier: GPL-2.0-only
	2	/*
	3	* mm_init.c - Memory initialisation verification and debugging
	4	*
	5	* Copyright 2008 IBM Corporation, 2008
	6	* Author Mel Gorman <mel@csn.ul.ie>
	7	*
	8	*/
	9	#include <linux/kernel.h>
	10	#include <linux/init.h>
	11	#include <linux/kobject.h>
	12	#include <linux/export.h>
	13	#include <linux/memory.h>
	14	#include <linux/notifier.h>
	15	#include <linux/sched.h>
	16	#include "internal.h"
	17
	18	#ifdef CONFIG_DEBUG_MEMORY_INIT
	19	int __meminitdata mminit_loglevel;
	20
	21	#ifndef SECTIONS_SHIFT
	22	#define SECTIONS_SHIFT 0
	23	#endif
	24
	25	/* The zonelists are simply reported, validation is manual. */
	26	void __init mminit_verify_zonelist(void)
	27	{
	28	int nid;
	29
	30	if (mminit_loglevel < MMINIT_VERIFY)
	31	return;
	32
	33	for_each_online_node(nid) {
	34	pg_data_t *pgdat = NODE_DATA(nid);
	35	struct zone *zone;
	36	struct zoneref *z;
	37	struct zonelist *zonelist;
	38	int i, listid, zoneid;
	39
	40	BUG_ON(MAX_ZONELISTS > 2);
	41	for (i = 0; i < MAX_ZONELISTS * MAX_NR_ZONES; i++) {
	42
	43	/* Identify the zone and nodelist */
	44	zoneid = i % MAX_NR_ZONES;
	45	listid = i / MAX_NR_ZONES;
	46	zonelist = &pgdat->node_zonelists[listid];
	47	zone = &pgdat->node_zones[zoneid];
	48	if (!populated_zone(zone))
	49	continue;
	50
	51	/* Print information about the zonelist */
	52	printk(KERN_DEBUG "mminit::zonelist %s %d:%s = ",
	53	listid > 0 ? "thisnode" : "general", nid,
	54	zone->name);
	55
	56	/* Iterate the zonelist */
	57	for_each_zone_zonelist(zone, z, zonelist, zoneid)
	58	pr_cont("%d:%s ", zone_to_nid(zone), zone->name);
	59	pr_cont("\n");
	60	}
	61	}
	62	}
	63
	64	void __init mminit_verify_pageflags_layout(void)
	65	{
	66	int shift, width;
	67	unsigned long or_mask, add_mask;
	68
	69	shift = 8 * sizeof(unsigned long);
	70	width = shift - SECTIONS_WIDTH - NODES_WIDTH - ZONES_WIDTH - LAST_CPUPID_SHIFT;
	71	mminit_dprintk(MMINIT_TRACE, "pageflags_layout_widths",
	72	"Section %d Node %d Zone %d Lastcpupid %d Flags %d\n",
	73	SECTIONS_WIDTH,
	74	NODES_WIDTH,
	75	ZONES_WIDTH,
	76	LAST_CPUPID_WIDTH,
	77	NR_PAGEFLAGS);
	78	mminit_dprintk(MMINIT_TRACE, "pageflags_layout_shifts",
	79	"Section %d Node %d Zone %d Lastcpupid %d\n",
	80	SECTIONS_SHIFT,
	81	NODES_SHIFT,
	82	ZONES_SHIFT,
	83	LAST_CPUPID_SHIFT);
	84	mminit_dprintk(MMINIT_TRACE, "pageflags_layout_pgshifts",
	85	"Section %lu Node %lu Zone %lu Lastcpupid %lu\n",
	86	(unsigned long)SECTIONS_PGSHIFT,
	87	(unsigned long)NODES_PGSHIFT,
	88	(unsigned long)ZONES_PGSHIFT,
	89	(unsigned long)LAST_CPUPID_PGSHIFT);
	90	mminit_dprintk(MMINIT_TRACE, "pageflags_layout_nodezoneid",
	91	"Node/Zone ID: %lu -> %lu\n",
	92	(unsigned long)(ZONEID_PGOFF + ZONEID_SHIFT),
	93	(unsigned long)ZONEID_PGOFF);
	94	mminit_dprintk(MMINIT_TRACE, "pageflags_layout_usage",
	95	"location: %d -> %d layout %d -> %d unused %d -> %d page-flags\n",
	96	shift, width, width, NR_PAGEFLAGS, NR_PAGEFLAGS, 0);
	97	#ifdef NODE_NOT_IN_PAGE_FLAGS
	98	mminit_dprintk(MMINIT_TRACE, "pageflags_layout_nodeflags",
	99	"Node not in page flags");
	100	#endif
	101	#ifdef LAST_CPUPID_NOT_IN_PAGE_FLAGS
	102	mminit_dprintk(MMINIT_TRACE, "pageflags_layout_nodeflags",
	103	"Last cpupid not in page flags");
	104	#endif
	105
	106	if (SECTIONS_WIDTH) {
	107	shift -= SECTIONS_WIDTH;
	108	BUG_ON(shift != SECTIONS_PGSHIFT);
	109	}
	110	if (NODES_WIDTH) {
	111	shift -= NODES_WIDTH;
	112	BUG_ON(shift != NODES_PGSHIFT);
	113	}
	114	if (ZONES_WIDTH) {
	115	shift -= ZONES_WIDTH;
	116	BUG_ON(shift != ZONES_PGSHIFT);
	117	}
	118
	119	/* Check for bitmask overlaps */
	120	or_mask = (ZONES_MASK << ZONES_PGSHIFT) \|
	121	(NODES_MASK << NODES_PGSHIFT) \|
	122	(SECTIONS_MASK << SECTIONS_PGSHIFT);
	123	add_mask = (ZONES_MASK << ZONES_PGSHIFT) +
	124	(NODES_MASK << NODES_PGSHIFT) +
	125	(SECTIONS_MASK << SECTIONS_PGSHIFT);
	126	BUG_ON(or_mask != add_mask);
	127	}
	128
	129	static __init int set_mminit_loglevel(char *str)
	130	{
	131	get_option(&str, &mminit_loglevel);
	132	return 0;
	133	}
	134	early_param("mminit_loglevel", set_mminit_loglevel);
	135	#endif /* CONFIG_DEBUG_MEMORY_INIT */
	136
	137	struct kobject *mm_kobj;
	138	EXPORT_SYMBOL_GPL(mm_kobj);
	139
	140	#ifdef CONFIG_SMP
	141	s32 vm_committed_as_batch = 32;
	142
	143	static void __meminit mm_compute_batch(void)
	144	{
	145	u64 memsized_batch;
	146	s32 nr = num_present_cpus();
	147	s32 batch = max_t(s32, nr*2, 32);
	148
	149	/* batch size set to 0.4% of (total memory/#cpus), or max int32 */
	150	memsized_batch = min_t(u64, (totalram_pages()/nr)/256, 0x7fffffff);
	151
	152	vm_committed_as_batch = max_t(s32, memsized_batch, batch);
	153	}
	154
	155	static int __meminit mm_compute_batch_notifier(struct notifier_block *self,
	156	unsigned long action, void *arg)
	157	{
	158	switch (action) {
	159	case MEM_ONLINE:
	160	case MEM_OFFLINE:
	161	mm_compute_batch();
	162	default:
	163	break;
	164	}
	165	return NOTIFY_OK;
	166	}
	167
	168	static struct notifier_block compute_batch_nb __meminitdata = {
	169	.notifier_call = mm_compute_batch_notifier,
	170	.priority = IPC_CALLBACK_PRI, /* use lowest priority */
	171	};
	172
	173	static int __init mm_compute_batch_init(void)
	174	{
	175	mm_compute_batch();
	176	register_hotmemory_notifier(&compute_batch_nb);
	177
	178	return 0;
	179	}
	180
	181	__initcall(mm_compute_batch_init);
	182
	183	#endif
	184
	185	static int __init mm_sysfs_init(void)
	186	{
	187	mm_kobj = kobject_create_and_add("mm", kernel_kobj);
	188	if (!mm_kobj)
	189	return -ENOMEM;
	190
	191	return 0;
	192	}
	193	postcore_initcall(mm_sysfs_init);