memory_hotplug.c 49.3 KB
Newer Older
1
// SPDX-License-Identifier: GPL-2.0-only
2 3 4 5 6 7 8 9
/*
 *  linux/mm/memory_hotplug.c
 *
 *  Copyright (C)
 */

#include <linux/stddef.h>
#include <linux/mm.h>
10
#include <linux/sched/signal.h>
11 12 13 14
#include <linux/swap.h>
#include <linux/interrupt.h>
#include <linux/pagemap.h>
#include <linux/compiler.h>
15
#include <linux/export.h>
16
#include <linux/pagevec.h>
17
#include <linux/writeback.h>
18 19 20 21
#include <linux/slab.h>
#include <linux/sysctl.h>
#include <linux/cpu.h>
#include <linux/memory.h>
22
#include <linux/memremap.h>
23 24 25
#include <linux/memory_hotplug.h>
#include <linux/highmem.h>
#include <linux/vmalloc.h>
26
#include <linux/ioport.h>
K
KAMEZAWA Hiroyuki 已提交
27 28 29
#include <linux/delay.h>
#include <linux/migrate.h>
#include <linux/page-isolation.h>
30
#include <linux/pfn.h>
31
#include <linux/suspend.h>
32
#include <linux/mm_inline.h>
33
#include <linux/firmware-map.h>
34
#include <linux/stop_machine.h>
35
#include <linux/hugetlb.h>
36
#include <linux/memblock.h>
37
#include <linux/compaction.h>
38
#include <linux/rmap.h>
39 40 41

#include <asm/tlbflush.h>

42
#include "internal.h"
43
#include "shuffle.h"
44

45 46 47 48 49 50 51 52
/*
 * online_page_callback contains pointer to current page onlining function.
 * Initially it is generic_online_page(). If it is required it could be
 * changed by calling set_online_page_callback() for callback registration
 * and restore_online_page_callback() for generic callback restore.
 */

static online_page_callback_t online_page_callback = generic_online_page;
53
static DEFINE_MUTEX(online_page_callback_lock);
54

55
DEFINE_STATIC_PERCPU_RWSEM(mem_hotplug_lock);
56

57 58 59 60
void get_online_mems(void)
{
	percpu_down_read(&mem_hotplug_lock);
}
61

62 63 64 65
void put_online_mems(void)
{
	percpu_up_read(&mem_hotplug_lock);
}
66

67 68
bool movable_node_enabled = false;

69
#ifndef CONFIG_MEMORY_HOTPLUG_DEFAULT_ONLINE
70
int memhp_default_online_type = MMOP_OFFLINE;
71
#else
72
int memhp_default_online_type = MMOP_ONLINE;
73
#endif
74

75 76
static int __init setup_memhp_default_state(char *str)
{
77 78 79 80
	const int online_type = memhp_online_type_from_str(str);

	if (online_type >= 0)
		memhp_default_online_type = online_type;
81 82 83 84 85

	return 1;
}
__setup("memhp_default_state=", setup_memhp_default_state);

86
void mem_hotplug_begin(void)
87
{
88 89
	cpus_read_lock();
	percpu_down_write(&mem_hotplug_lock);
90 91
}

92
void mem_hotplug_done(void)
93
{
94 95
	percpu_up_write(&mem_hotplug_lock);
	cpus_read_unlock();
96
}
97

98 99
u64 max_mem_size = U64_MAX;

100
/* add this memory to iomem resource */
101 102
static struct resource *register_memory_resource(u64 start, u64 size,
						 const char *resource_name)
103
{
104 105
	struct resource *res;
	unsigned long flags =  IORESOURCE_SYSTEM_RAM | IORESOURCE_BUSY;
106 107 108

	if (strcmp(resource_name, "System RAM"))
		flags |= IORESOURCE_MEM_DRIVER_MANAGED;
109

110 111 112 113 114 115 116
	/*
	 * Make sure value parsed from 'mem=' only restricts memory adding
	 * while booting, so that memory hotplug won't be impacted. Please
	 * refer to document of 'mem=' in kernel-parameters.txt for more
	 * details.
	 */
	if (start + size > max_mem_size && system_state < SYSTEM_RUNNING)
117 118
		return ERR_PTR(-E2BIG);

119 120 121 122 123 124 125 126 127 128 129
	/*
	 * Request ownership of the new memory range.  This might be
	 * a child of an existing resource that was present but
	 * not marked as busy.
	 */
	res = __request_region(&iomem_resource, start, size,
			       resource_name, flags);

	if (!res) {
		pr_debug("Unable to reserve System RAM region: %016llx->%016llx\n",
				start, start + size);
130
		return ERR_PTR(-EEXIST);
131 132 133 134 135 136 137 138 139 140 141 142
	}
	return res;
}

static void release_memory_resource(struct resource *res)
{
	if (!res)
		return;
	release_resource(res);
	kfree(res);
}

143
#ifdef CONFIG_MEMORY_HOTPLUG_SPARSE
144 145
void get_page_bootmem(unsigned long info,  struct page *page,
		      unsigned long type)
146
{
147
	page->freelist = (void *)type;
148 149
	SetPagePrivate(page);
	set_page_private(page, info);
150
	page_ref_inc(page);
151 152
}

153
void put_page_bootmem(struct page *page)
154
{
A
Andrea Arcangeli 已提交
155
	unsigned long type;
156

157
	type = (unsigned long) page->freelist;
A
Andrea Arcangeli 已提交
158 159
	BUG_ON(type < MEMORY_HOTPLUG_MIN_BOOTMEM_TYPE ||
	       type > MEMORY_HOTPLUG_MAX_BOOTMEM_TYPE);
160

161
	if (page_ref_dec_return(page) == 1) {
162
		page->freelist = NULL;
163 164
		ClearPagePrivate(page);
		set_page_private(page, 0);
A
Andrea Arcangeli 已提交
165
		INIT_LIST_HEAD(&page->lru);
166
		free_reserved_page(page);
167 168 169
	}
}

170 171
#ifdef CONFIG_HAVE_BOOTMEM_INFO_NODE
#ifndef CONFIG_SPARSEMEM_VMEMMAP
172
static void register_page_bootmem_info_section(unsigned long start_pfn)
173
{
174
	unsigned long mapsize, section_nr, i;
175 176
	struct mem_section *ms;
	struct page *page, *memmap;
177
	struct mem_section_usage *usage;
178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196

	section_nr = pfn_to_section_nr(start_pfn);
	ms = __nr_to_section(section_nr);

	/* Get section's memmap address */
	memmap = sparse_decode_mem_map(ms->section_mem_map, section_nr);

	/*
	 * Get page for the memmap's phys address
	 * XXX: need more consideration for sparse_vmemmap...
	 */
	page = virt_to_page(memmap);
	mapsize = sizeof(struct page) * PAGES_PER_SECTION;
	mapsize = PAGE_ALIGN(mapsize) >> PAGE_SHIFT;

	/* remember memmap's page */
	for (i = 0; i < mapsize; i++, page++)
		get_page_bootmem(section_nr, page, SECTION_INFO);

197 198
	usage = ms->usage;
	page = virt_to_page(usage);
199

200
	mapsize = PAGE_ALIGN(mem_section_usage_size()) >> PAGE_SHIFT;
201 202

	for (i = 0; i < mapsize; i++, page++)
203
		get_page_bootmem(section_nr, page, MIX_SECTION_INFO);
204 205

}
206 207 208
#else /* CONFIG_SPARSEMEM_VMEMMAP */
static void register_page_bootmem_info_section(unsigned long start_pfn)
{
209
	unsigned long mapsize, section_nr, i;
210 211
	struct mem_section *ms;
	struct page *page, *memmap;
212
	struct mem_section_usage *usage;
213 214 215 216 217 218 219 220

	section_nr = pfn_to_section_nr(start_pfn);
	ms = __nr_to_section(section_nr);

	memmap = sparse_decode_mem_map(ms->section_mem_map, section_nr);

	register_page_bootmem_memmap(section_nr, memmap, PAGES_PER_SECTION);

221 222
	usage = ms->usage;
	page = virt_to_page(usage);
223

224
	mapsize = PAGE_ALIGN(mem_section_usage_size()) >> PAGE_SHIFT;
225 226 227 228 229

	for (i = 0; i < mapsize; i++, page++)
		get_page_bootmem(section_nr, page, MIX_SECTION_INFO);
}
#endif /* !CONFIG_SPARSEMEM_VMEMMAP */
230

231
void __init register_page_bootmem_info_node(struct pglist_data *pgdat)
232 233 234 235 236 237 238 239 240 241 242 243
{
	unsigned long i, pfn, end_pfn, nr_pages;
	int node = pgdat->node_id;
	struct page *page;

	nr_pages = PAGE_ALIGN(sizeof(struct pglist_data)) >> PAGE_SHIFT;
	page = virt_to_page(pgdat);

	for (i = 0; i < nr_pages; i++, page++)
		get_page_bootmem(node, page, NODE_INFO);

	pfn = pgdat->node_start_pfn;
244
	end_pfn = pgdat_end_pfn(pgdat);
245

246
	/* register section info */
247 248 249 250 251
	for (; pfn < end_pfn; pfn += PAGES_PER_SECTION) {
		/*
		 * Some platforms can assign the same pfn to multiple nodes - on
		 * node0 as well as nodeN.  To avoid registering a pfn against
		 * multiple nodes we check that this pfn does not already
252
		 * reside in some other nodes.
253
		 */
254
		if (pfn_valid(pfn) && (early_pfn_to_nid(pfn) == node))
255 256
			register_page_bootmem_info_section(pfn);
	}
257
}
258
#endif /* CONFIG_HAVE_BOOTMEM_INFO_NODE */
259

260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286
static int check_pfn_span(unsigned long pfn, unsigned long nr_pages,
		const char *reason)
{
	/*
	 * Disallow all operations smaller than a sub-section and only
	 * allow operations smaller than a section for
	 * SPARSEMEM_VMEMMAP. Note that check_hotplug_memory_range()
	 * enforces a larger memory_block_size_bytes() granularity for
	 * memory that will be marked online, so this check should only
	 * fire for direct arch_{add,remove}_memory() users outside of
	 * add_memory_resource().
	 */
	unsigned long min_align;

	if (IS_ENABLED(CONFIG_SPARSEMEM_VMEMMAP))
		min_align = PAGES_PER_SUBSECTION;
	else
		min_align = PAGES_PER_SECTION;
	if (!IS_ALIGNED(pfn, min_align)
			|| !IS_ALIGNED(nr_pages, min_align)) {
		WARN(1, "Misaligned __%s_pages start: %#lx end: #%lx\n",
				reason, pfn, pfn + nr_pages - 1);
		return -EINVAL;
	}
	return 0;
}

287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302
static int check_hotplug_memory_addressable(unsigned long pfn,
					    unsigned long nr_pages)
{
	const u64 max_addr = PFN_PHYS(pfn + nr_pages) - 1;

	if (max_addr >> MAX_PHYSMEM_BITS) {
		const u64 max_allowed = (1ull << (MAX_PHYSMEM_BITS + 1)) - 1;
		WARN(1,
		     "Hotplugged memory exceeds maximum addressable address, range=%#llx-%#llx, maximum=%#llx\n",
		     (u64)PFN_PHYS(pfn), max_addr, max_allowed);
		return -E2BIG;
	}

	return 0;
}

303 304 305 306 307 308
/*
 * Reasonably generic function for adding memory.  It is
 * expected that archs that support memory hotplug will
 * call this function after deciding the zone to which to
 * add the new pages.
 */
309
int __ref __add_pages(int nid, unsigned long pfn, unsigned long nr_pages,
310
		struct mhp_params *params)
311
{
312 313
	const unsigned long end_pfn = pfn + nr_pages;
	unsigned long cur_nr_pages;
314
	int err;
315
	struct vmem_altmap *altmap = params->altmap;
316

317 318 319
	if (WARN_ON_ONCE(!params->pgprot.pgprot))
		return -EINVAL;

320 321 322 323
	err = check_hotplug_memory_addressable(pfn, nr_pages);
	if (err)
		return err;

324 325 326 327
	if (altmap) {
		/*
		 * Validate altmap is within bounds of the total request
		 */
328
		if (altmap->base_pfn != pfn
329 330
				|| vmem_altmap_offset(altmap) > nr_pages) {
			pr_warn_once("memory add fail, invalid altmap\n");
331
			return -EINVAL;
332 333 334 335
		}
		altmap->alloc = 0;
	}

336 337 338 339
	err = check_pfn_span(pfn, nr_pages, "add");
	if (err)
		return err;

340 341 342 343 344
	for (; pfn < end_pfn; pfn += cur_nr_pages) {
		/* Select all remaining pages up to the next section boundary */
		cur_nr_pages = min(end_pfn - pfn,
				   SECTION_ALIGN_UP(pfn + 1) - pfn);
		err = sparse_add_section(nid, pfn, cur_nr_pages, altmap);
345 346
		if (err)
			break;
347
		cond_resched();
348
	}
349
	vmemmap_populate_print_last();
350 351 352
	return err;
}

353 354 355
#ifdef CONFIG_NUMA
int __weak memory_add_physaddr_to_nid(u64 start)
{
356
	pr_info_once("Unknown online node for memory at 0x%llx, assuming node 0\n",
357 358 359 360
			start);
	return 0;
}
EXPORT_SYMBOL_GPL(memory_add_physaddr_to_nid);
361 362 363 364 365 366 367 368

int __weak phys_to_target_node(u64 start)
{
	pr_info_once("Unknown target node for memory at 0x%llx, assuming node 0\n",
			start);
	return 0;
}
EXPORT_SYMBOL_GPL(phys_to_target_node);
369 370
#endif

371
/* find the smallest valid pfn in the range [start_pfn, end_pfn) */
372
static unsigned long find_smallest_section_pfn(int nid, struct zone *zone,
373 374 375
				     unsigned long start_pfn,
				     unsigned long end_pfn)
{
376
	for (; start_pfn < end_pfn; start_pfn += PAGES_PER_SUBSECTION) {
377
		if (unlikely(!pfn_to_online_page(start_pfn)))
378 379 380 381 382
			continue;

		if (unlikely(pfn_to_nid(start_pfn) != nid))
			continue;

383
		if (zone != page_zone(pfn_to_page(start_pfn)))
384 385 386 387 388 389 390 391 392
			continue;

		return start_pfn;
	}

	return 0;
}

/* find the biggest valid pfn in the range [start_pfn, end_pfn). */
393
static unsigned long find_biggest_section_pfn(int nid, struct zone *zone,
394 395 396 397 398 399 400
				    unsigned long start_pfn,
				    unsigned long end_pfn)
{
	unsigned long pfn;

	/* pfn is the end pfn of a memory section. */
	pfn = end_pfn - 1;
401
	for (; pfn >= start_pfn; pfn -= PAGES_PER_SUBSECTION) {
402
		if (unlikely(!pfn_to_online_page(pfn)))
403 404 405 406 407
			continue;

		if (unlikely(pfn_to_nid(pfn) != nid))
			continue;

408
		if (zone != page_zone(pfn_to_page(pfn)))
409 410 411 412 413 414 415 416 417 418 419 420 421 422 423
			continue;

		return pfn;
	}

	return 0;
}

static void shrink_zone_span(struct zone *zone, unsigned long start_pfn,
			     unsigned long end_pfn)
{
	unsigned long pfn;
	int nid = zone_to_nid(zone);

	zone_span_writelock(zone);
424
	if (zone->zone_start_pfn == start_pfn) {
425 426 427 428 429 430 431
		/*
		 * If the section is smallest section in the zone, it need
		 * shrink zone->zone_start_pfn and zone->zone_spanned_pages.
		 * In this case, we find second smallest valid mem_section
		 * for shrinking zone.
		 */
		pfn = find_smallest_section_pfn(nid, zone, end_pfn,
432
						zone_end_pfn(zone));
433
		if (pfn) {
434
			zone->spanned_pages = zone_end_pfn(zone) - pfn;
435
			zone->zone_start_pfn = pfn;
436 437 438
		} else {
			zone->zone_start_pfn = 0;
			zone->spanned_pages = 0;
439
		}
440
	} else if (zone_end_pfn(zone) == end_pfn) {
441 442 443 444 445 446
		/*
		 * If the section is biggest section in the zone, it need
		 * shrink zone->spanned_pages.
		 * In this case, we find second biggest valid mem_section for
		 * shrinking zone.
		 */
447
		pfn = find_biggest_section_pfn(nid, zone, zone->zone_start_pfn,
448 449
					       start_pfn);
		if (pfn)
450
			zone->spanned_pages = pfn - zone->zone_start_pfn + 1;
451 452 453 454
		else {
			zone->zone_start_pfn = 0;
			zone->spanned_pages = 0;
		}
455 456 457 458
	}
	zone_span_writeunlock(zone);
}

459
static void update_pgdat_span(struct pglist_data *pgdat)
460
{
461 462 463 464 465 466 467 468 469
	unsigned long node_start_pfn = 0, node_end_pfn = 0;
	struct zone *zone;

	for (zone = pgdat->node_zones;
	     zone < pgdat->node_zones + MAX_NR_ZONES; zone++) {
		unsigned long zone_end_pfn = zone->zone_start_pfn +
					     zone->spanned_pages;

		/* No need to lock the zones, they can't change. */
470 471 472 473 474 475 476 477
		if (!zone->spanned_pages)
			continue;
		if (!node_end_pfn) {
			node_start_pfn = zone->zone_start_pfn;
			node_end_pfn = zone_end_pfn;
			continue;
		}

478 479 480 481
		if (zone_end_pfn > node_end_pfn)
			node_end_pfn = zone_end_pfn;
		if (zone->zone_start_pfn < node_start_pfn)
			node_start_pfn = zone->zone_start_pfn;
482 483
	}

484 485
	pgdat->node_start_pfn = node_start_pfn;
	pgdat->node_spanned_pages = node_end_pfn - node_start_pfn;
486 487
}

488 489 490
void __ref remove_pfn_range_from_zone(struct zone *zone,
				      unsigned long start_pfn,
				      unsigned long nr_pages)
491
{
492
	const unsigned long end_pfn = start_pfn + nr_pages;
493
	struct pglist_data *pgdat = zone->zone_pgdat;
494
	unsigned long pfn, cur_nr_pages, flags;
495

496
	/* Poison struct pages because they are now uninitialized again. */
497 498 499 500 501 502 503 504 505
	for (pfn = start_pfn; pfn < end_pfn; pfn += cur_nr_pages) {
		cond_resched();

		/* Select all remaining pages up to the next section boundary */
		cur_nr_pages =
			min(end_pfn - pfn, SECTION_ALIGN_UP(pfn + 1) - pfn);
		page_init_poison(pfn_to_page(pfn),
				 sizeof(struct page) * cur_nr_pages);
	}
506

507 508 509 510 511 512 513 514 515 516
#ifdef CONFIG_ZONE_DEVICE
	/*
	 * Zone shrinking code cannot properly deal with ZONE_DEVICE. So
	 * we will not try to shrink the zones - which is okay as
	 * set_zone_contiguous() cannot deal with ZONE_DEVICE either way.
	 */
	if (zone_idx(zone) == ZONE_DEVICE)
		return;
#endif

517 518
	clear_zone_contiguous(zone);

519 520
	pgdat_resize_lock(zone->zone_pgdat, &flags);
	shrink_zone_span(zone, start_pfn, start_pfn + nr_pages);
521
	update_pgdat_span(pgdat);
522
	pgdat_resize_unlock(zone->zone_pgdat, &flags);
523 524

	set_zone_contiguous(zone);
525 526
}

527 528 529
static void __remove_section(unsigned long pfn, unsigned long nr_pages,
			     unsigned long map_offset,
			     struct vmem_altmap *altmap)
530
{
531
	struct mem_section *ms = __pfn_to_section(pfn);
532

533 534
	if (WARN_ON_ONCE(!valid_section(ms)))
		return;
535

536
	sparse_remove_section(ms, pfn, nr_pages, map_offset, altmap);
537 538 539
}

/**
540
 * __remove_pages() - remove sections of pages
541
 * @pfn: starting pageframe (must be aligned to start of a section)
542
 * @nr_pages: number of pages to remove (must be multiple of section size)
543
 * @altmap: alternative device page map or %NULL if default memmap is used
544 545 546 547 548 549
 *
 * Generic helper function to remove section mappings and sysfs entries
 * for the section of the memory we are removing. Caller needs to make
 * sure that pages are marked reserved and zones are adjust properly by
 * calling offline_pages().
 */
550 551
void __remove_pages(unsigned long pfn, unsigned long nr_pages,
		    struct vmem_altmap *altmap)
552
{
553 554
	const unsigned long end_pfn = pfn + nr_pages;
	unsigned long cur_nr_pages;
555 556
	unsigned long map_offset = 0;

557
	map_offset = vmem_altmap_offset(altmap);
558

559 560
	if (check_pfn_span(pfn, nr_pages, "remove"))
		return;
561

562
	for (; pfn < end_pfn; pfn += cur_nr_pages) {
563
		cond_resched();
564
		/* Select all remaining pages up to the next section boundary */
565 566
		cur_nr_pages = min(end_pfn - pfn,
				   SECTION_ALIGN_UP(pfn + 1) - pfn);
567
		__remove_section(pfn, cur_nr_pages, map_offset, altmap);
568
		map_offset = 0;
569 570 571
	}
}

572 573 574 575
int set_online_page_callback(online_page_callback_t callback)
{
	int rc = -EINVAL;

576 577
	get_online_mems();
	mutex_lock(&online_page_callback_lock);
578 579 580 581 582 583

	if (online_page_callback == generic_online_page) {
		online_page_callback = callback;
		rc = 0;
	}

584 585
	mutex_unlock(&online_page_callback_lock);
	put_online_mems();
586 587 588 589 590 591 592 593 594

	return rc;
}
EXPORT_SYMBOL_GPL(set_online_page_callback);

int restore_online_page_callback(online_page_callback_t callback)
{
	int rc = -EINVAL;

595 596
	get_online_mems();
	mutex_lock(&online_page_callback_lock);
597 598 599 600 601 602

	if (online_page_callback == callback) {
		online_page_callback = generic_online_page;
		rc = 0;
	}

603 604
	mutex_unlock(&online_page_callback_lock);
	put_online_mems();
605 606 607 608 609

	return rc;
}
EXPORT_SYMBOL_GPL(restore_online_page_callback);

610
void generic_online_page(struct page *page, unsigned int order)
611
{
612 613 614 615 616 617 618
	/*
	 * Freeing the page with debug_pagealloc enabled will try to unmap it,
	 * so we should map it first. This is better than introducing a special
	 * case in page freeing fast path.
	 */
	if (debug_pagealloc_enabled_static())
		kernel_map_pages(page, 1 << order, 1);
619 620 621 622 623 624 625
	__free_pages_core(page, order);
	totalram_pages_add(1UL << order);
#ifdef CONFIG_HIGHMEM
	if (PageHighMem(page))
		totalhigh_pages_add(1UL << order);
#endif
}
626
EXPORT_SYMBOL_GPL(generic_online_page);
627

628
static void online_pages_range(unsigned long start_pfn, unsigned long nr_pages)
629
{
630 631 632 633
	const unsigned long end_pfn = start_pfn + nr_pages;
	unsigned long pfn;

	/*
634 635 636 637
	 * Online the pages in MAX_ORDER - 1 aligned chunks. The callback might
	 * decide to not expose all pages to the buddy (e.g., expose them
	 * later). We account all pages as being online and belonging to this
	 * zone ("present").
638
	 */
639 640
	for (pfn = start_pfn; pfn < end_pfn; pfn += MAX_ORDER_NR_PAGES)
		(*online_page_callback)(pfn_to_page(pfn), MAX_ORDER - 1);
641

642 643
	/* mark all involved sections as online */
	online_mem_sections(start_pfn, end_pfn);
644 645
}

646 647 648 649 650 651
/* check which state of node_states will be changed when online memory */
static void node_states_check_changes_online(unsigned long nr_pages,
	struct zone *zone, struct memory_notify *arg)
{
	int nid = zone_to_nid(zone);

652 653 654
	arg->status_change_nid = NUMA_NO_NODE;
	arg->status_change_nid_normal = NUMA_NO_NODE;
	arg->status_change_nid_high = NUMA_NO_NODE;
655

656 657 658
	if (!node_state(nid, N_MEMORY))
		arg->status_change_nid = nid;
	if (zone_idx(zone) <= ZONE_NORMAL && !node_state(nid, N_NORMAL_MEMORY))
659
		arg->status_change_nid_normal = nid;
660
#ifdef CONFIG_HIGHMEM
661
	if (zone_idx(zone) <= ZONE_HIGHMEM && !node_state(nid, N_HIGH_MEMORY))
662 663
		arg->status_change_nid_high = nid;
#endif
664 665 666 667 668 669 670
}

static void node_states_set_node(int node, struct memory_notify *arg)
{
	if (arg->status_change_nid_normal >= 0)
		node_set_state(node, N_NORMAL_MEMORY);

671 672 673
	if (arg->status_change_nid_high >= 0)
		node_set_state(node, N_HIGH_MEMORY);

674 675
	if (arg->status_change_nid >= 0)
		node_set_state(node, N_MEMORY);
676 677
}

678 679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698
static void __meminit resize_zone_range(struct zone *zone, unsigned long start_pfn,
		unsigned long nr_pages)
{
	unsigned long old_end_pfn = zone_end_pfn(zone);

	if (zone_is_empty(zone) || start_pfn < zone->zone_start_pfn)
		zone->zone_start_pfn = start_pfn;

	zone->spanned_pages = max(start_pfn + nr_pages, old_end_pfn) - zone->zone_start_pfn;
}

static void __meminit resize_pgdat_range(struct pglist_data *pgdat, unsigned long start_pfn,
                                     unsigned long nr_pages)
{
	unsigned long old_end_pfn = pgdat_end_pfn(pgdat);

	if (!pgdat->node_spanned_pages || start_pfn < pgdat->node_start_pfn)
		pgdat->node_start_pfn = start_pfn;

	pgdat->node_spanned_pages = max(start_pfn + nr_pages, old_end_pfn) - pgdat->node_start_pfn;

699 700 701 702 703
}
/*
 * Associate the pfn range with the given zone, initializing the memmaps
 * and resizing the pgdat/zone data to span the added pages. After this
 * call, all affected pages are PG_reserved.
704 705 706 707
 *
 * All aligned pageblocks are initialized to the specified migratetype
 * (usually MIGRATE_MOVABLE). Besides setting the migratetype, no related
 * zone stats (e.g., nr_isolate_pageblock) are touched.
708
 */
709
void __ref move_pfn_range_to_zone(struct zone *zone, unsigned long start_pfn,
710 711
				  unsigned long nr_pages,
				  struct vmem_altmap *altmap, int migratetype)
712 713 714 715
{
	struct pglist_data *pgdat = zone->zone_pgdat;
	int nid = pgdat->node_id;
	unsigned long flags;
716

717 718 719 720 721
	clear_zone_contiguous(zone);

	/* TODO Huh pgdat is irqsave while zone is not. It used to be like that before */
	pgdat_resize_lock(pgdat, &flags);
	zone_span_writelock(zone);
722 723
	if (zone_is_empty(zone))
		init_currently_empty_zone(zone, start_pfn, nr_pages);
724 725 726 727 728 729 730 731 732 733 734
	resize_zone_range(zone, start_pfn, nr_pages);
	zone_span_writeunlock(zone);
	resize_pgdat_range(pgdat, start_pfn, nr_pages);
	pgdat_resize_unlock(pgdat, &flags);

	/*
	 * TODO now we have a visible range of pages which are not associated
	 * with their zone properly. Not nice but set_pfnblock_flags_mask
	 * expects the zone spans the pfn range. All the pages in the range
	 * are reserved so nobody should be touching them so we should be safe
	 */
735
	memmap_init_zone(nr_pages, nid, zone_idx(zone), start_pfn,
736
			 MEMINIT_HOTPLUG, altmap, migratetype);
737 738 739 740

	set_zone_contiguous(zone);
}

741 742 743 744 745
/*
 * Returns a default kernel memory zone for the given pfn range.
 * If no kernel zone covers this pfn range it will automatically go
 * to the ZONE_NORMAL.
 */
746
static struct zone *default_kernel_zone_for_pfn(int nid, unsigned long start_pfn,
747 748 749 750 751 752 753 754 755 756 757 758 759 760 761
		unsigned long nr_pages)
{
	struct pglist_data *pgdat = NODE_DATA(nid);
	int zid;

	for (zid = 0; zid <= ZONE_NORMAL; zid++) {
		struct zone *zone = &pgdat->node_zones[zid];

		if (zone_intersects(zone, start_pfn, nr_pages))
			return zone;
	}

	return &pgdat->node_zones[ZONE_NORMAL];
}

762 763
static inline struct zone *default_zone_for_pfn(int nid, unsigned long start_pfn,
		unsigned long nr_pages)
764
{
765 766 767 768 769
	struct zone *kernel_zone = default_kernel_zone_for_pfn(nid, start_pfn,
			nr_pages);
	struct zone *movable_zone = &NODE_DATA(nid)->node_zones[ZONE_MOVABLE];
	bool in_kernel = zone_intersects(kernel_zone, start_pfn, nr_pages);
	bool in_movable = zone_intersects(movable_zone, start_pfn, nr_pages);
770 771

	/*
772 773
	 * We inherit the existing zone in a simple case where zones do not
	 * overlap in the given range
774
	 */
775 776
	if (in_kernel ^ in_movable)
		return (in_kernel) ? kernel_zone : movable_zone;
777

778 779 780 781 782 783
	/*
	 * If the range doesn't belong to any zone or two zones overlap in the
	 * given range then we use movable zone only if movable_node is
	 * enabled because we always online to a kernel zone by default.
	 */
	return movable_node_enabled ? movable_zone : kernel_zone;
784 785
}

786 787
struct zone * zone_for_pfn_range(int online_type, int nid, unsigned start_pfn,
		unsigned long nr_pages)
788
{
789 790
	if (online_type == MMOP_ONLINE_KERNEL)
		return default_kernel_zone_for_pfn(nid, start_pfn, nr_pages);
791

792 793
	if (online_type == MMOP_ONLINE_MOVABLE)
		return &NODE_DATA(nid)->node_zones[ZONE_MOVABLE];
794

795
	return default_zone_for_pfn(nid, start_pfn, nr_pages);
796 797
}

798 799
int __ref online_pages(unsigned long pfn, unsigned long nr_pages,
		       int online_type, int nid)
800
{
801
	unsigned long flags;
802
	struct zone *zone;
803
	int need_zonelists_rebuild = 0;
804 805
	int ret;
	struct memory_notify arg;
806

807 808 809 810 811
	/* We can only online full sections (e.g., SECTION_IS_ONLINE) */
	if (WARN_ON_ONCE(!nr_pages ||
			 !IS_ALIGNED(pfn | nr_pages, PAGES_PER_SECTION)))
		return -EINVAL;

812 813
	mem_hotplug_begin();

814
	/* associate pfn range with the zone */
815
	zone = zone_for_pfn_range(online_type, nid, pfn, nr_pages);
816
	move_pfn_range_to_zone(zone, pfn, nr_pages, NULL, MIGRATE_MOVABLE);
817

818 819
	arg.start_pfn = pfn;
	arg.nr_pages = nr_pages;
820
	node_states_check_changes_online(nr_pages, zone, &arg);
821 822 823

	ret = memory_notify(MEM_GOING_ONLINE, &arg);
	ret = notifier_to_errno(ret);
824 825 826
	if (ret)
		goto failed_addition;

827 828 829 830 831
	/*
	 * If this zone is not populated, then it is not in zonelist.
	 * This means the page allocator ignores this zone.
	 * So, zonelist must be updated after online.
	 */
832
	if (!populated_zone(zone)) {
833
		need_zonelists_rebuild = 1;
834
		setup_zone_pageset(zone);
835
	}
836

837 838
	online_pages_range(pfn, nr_pages);
	zone->present_pages += nr_pages;
839 840

	pgdat_resize_lock(zone->zone_pgdat, &flags);
841
	zone->zone_pgdat->node_present_pages += nr_pages;
842 843
	pgdat_resize_unlock(zone->zone_pgdat, &flags);

844 845 846 847 848 849 850 851
	/*
	 * When exposing larger, physically contiguous memory areas to the
	 * buddy, shuffling in the buddy (when freeing onlined pages, putting
	 * them either to the head or the tail of the freelist) is only helpful
	 * for maintaining the shuffle, but not for creating the initial
	 * shuffle. Shuffle the whole zone to make sure the just onlined pages
	 * are properly distributed across the whole freelist.
	 */
852 853
	shuffle_zone(zone);

854 855 856
	node_states_set_node(nid, &arg);
	if (need_zonelists_rebuild)
		build_all_zonelists(NULL);
857
	zone_pcp_update(zone);
858

859 860
	init_per_zone_wmark_min();

861 862
	kswapd_run(nid);
	kcompactd_run(nid);
863

864
	writeback_set_ratelimit();
865

866
	memory_notify(MEM_ONLINE, &arg);
867
	mem_hotplug_done();
868
	return 0;
869 870 871 872 873 874

failed_addition:
	pr_debug("online_pages [mem %#010llx-%#010llx] failed\n",
		 (unsigned long long) pfn << PAGE_SHIFT,
		 (((unsigned long long) pfn + nr_pages) << PAGE_SHIFT) - 1);
	memory_notify(MEM_CANCEL_ONLINE, &arg);
875
	remove_pfn_range_from_zone(zone, pfn, nr_pages);
876
	mem_hotplug_done();
877
	return ret;
878
}
879
#endif /* CONFIG_MEMORY_HOTPLUG_SPARSE */
880

881 882 883 884 885 886 887 888 889 890
static void reset_node_present_pages(pg_data_t *pgdat)
{
	struct zone *z;

	for (z = pgdat->node_zones; z < pgdat->node_zones + MAX_NR_ZONES; z++)
		z->present_pages = 0;

	pgdat->node_present_pages = 0;
}

891
/* we are OK calling __meminit stuff here - we have CONFIG_MEMORY_HOTPLUG */
892
static pg_data_t __ref *hotadd_new_pgdat(int nid)
893 894 895
{
	struct pglist_data *pgdat;

896 897 898 899 900
	pgdat = NODE_DATA(nid);
	if (!pgdat) {
		pgdat = arch_alloc_nodedata(nid);
		if (!pgdat)
			return NULL;
901

902 903
		pgdat->per_cpu_nodestats =
			alloc_percpu(struct per_cpu_nodestat);
904
		arch_refresh_nodedata(nid, pgdat);
905
	} else {
906
		int cpu;
907
		/*
908 909
		 * Reset the nr_zones, order and highest_zoneidx before reuse.
		 * Note that kswapd will init kswapd_highest_zoneidx properly
910 911
		 * when it starts in the near future.
		 */
912
		pgdat->nr_zones = 0;
913
		pgdat->kswapd_order = 0;
914
		pgdat->kswapd_highest_zoneidx = 0;
915 916 917 918 919 920
		for_each_online_cpu(cpu) {
			struct per_cpu_nodestat *p;

			p = per_cpu_ptr(pgdat->per_cpu_nodestats, cpu);
			memset(p, 0, sizeof(*p));
		}
921
	}
922 923

	/* we can use NODE_DATA(nid) from here */
924
	pgdat->node_id = nid;
925
	pgdat->node_start_pfn = 0;
926

927
	/* init node's zones as empty zones, we don't have any present pages.*/
928
	free_area_init_core_hotplug(nid);
929

930 931 932 933
	/*
	 * The node we allocated has no zone fallback lists. For avoiding
	 * to access not-initialized zonelist, build here.
	 */
934
	build_all_zonelists(pgdat);
935

936 937 938 939 940
	/*
	 * When memory is hot-added, all the memory is in offline state. So
	 * clear all zones' present_pages because they will be updated in
	 * online_pages() and offline_pages().
	 */
941
	reset_node_managed_pages(pgdat);
942 943
	reset_node_present_pages(pgdat);

944 945 946
	return pgdat;
}

947
static void rollback_node_hotadd(int nid)
948
{
949 950
	pg_data_t *pgdat = NODE_DATA(nid);

951
	arch_refresh_nodedata(nid, NULL);
952
	free_percpu(pgdat->per_cpu_nodestats);
953 954 955
	arch_free_nodedata(pgdat);
}

956

957 958
/**
 * try_online_node - online a node if offlined
959
 * @nid: the node ID
960
 * @set_node_online: Whether we want to online the node
961
 * called by cpu_up() to online a node without onlined memory.
962 963 964 965 966
 *
 * Returns:
 * 1 -> a new node has been allocated
 * 0 -> the node is already online
 * -ENOMEM -> the node could not be allocated
967
 */
968
static int __try_online_node(int nid, bool set_node_online)
969
{
970 971
	pg_data_t *pgdat;
	int ret = 1;
972

973 974 975
	if (node_online(nid))
		return 0;

976
	pgdat = hotadd_new_pgdat(nid);
977
	if (!pgdat) {
978
		pr_err("Cannot online node %d due to NULL pgdat\n", nid);
979 980 981
		ret = -ENOMEM;
		goto out;
	}
982 983 984 985 986 987

	if (set_node_online) {
		node_set_online(nid);
		ret = register_one_node(nid);
		BUG_ON(ret);
	}
988
out:
989 990 991 992 993 994 995 996 997 998 999
	return ret;
}

/*
 * Users of this function always want to online/register the node
 */
int try_online_node(int nid)
{
	int ret;

	mem_hotplug_begin();
1000
	ret =  __try_online_node(nid, true);
1001
	mem_hotplug_done();
1002 1003 1004
	return ret;
}

1005 1006
static int check_hotplug_memory_range(u64 start, u64 size)
{
1007
	/* memory range must be block size aligned */
1008 1009
	if (!size || !IS_ALIGNED(start, memory_block_size_bytes()) ||
	    !IS_ALIGNED(size, memory_block_size_bytes())) {
1010
		pr_err("Block size [%#lx] unaligned hotplug range: start %#llx, size %#llx",
1011
		       memory_block_size_bytes(), start, size);
1012 1013 1014 1015 1016 1017
		return -EINVAL;
	}

	return 0;
}

1018 1019
static int online_memory_block(struct memory_block *mem, void *arg)
{
1020
	mem->online_type = memhp_default_online_type;
1021
	return device_online(&mem->dev);
1022 1023
}

1024 1025 1026 1027 1028 1029
/*
 * NOTE: The caller must call lock_device_hotplug() to serialize hotplug
 * and online/offline operations (triggered e.g. by sysfs).
 *
 * we are OK calling __meminit stuff here - we have CONFIG_MEMORY_HOTPLUG
 */
1030
int __ref add_memory_resource(int nid, struct resource *res)
1031
{
1032
	struct mhp_params params = { .pgprot = PAGE_KERNEL };
1033
	u64 start, size;
1034
	bool new_node = false;
1035 1036
	int ret;

1037 1038 1039
	start = res->start;
	size = resource_size(res);

1040 1041 1042 1043
	ret = check_hotplug_memory_range(start, size);
	if (ret)
		return ret;

1044 1045 1046 1047 1048
	if (!node_possible(nid)) {
		WARN(1, "node %d was absent from the node_possible_map\n", nid);
		return -EINVAL;
	}

1049
	mem_hotplug_begin();
1050

1051 1052
	if (IS_ENABLED(CONFIG_ARCH_KEEP_MEMBLOCK))
		memblock_add_node(start, size, nid);
1053

1054
	ret = __try_online_node(nid, false);
1055 1056 1057
	if (ret < 0)
		goto error;
	new_node = ret;
1058

1059
	/* call arch's memory hotadd */
1060
	ret = arch_add_memory(nid, start, size, &params);
1061 1062 1063
	if (ret < 0)
		goto error;

1064 1065 1066 1067 1068 1069 1070
	/* create memory block devices after memory was added */
	ret = create_memory_block_devices(start, size);
	if (ret) {
		arch_remove_memory(nid, start, size, NULL);
		goto error;
	}

1071
	if (new_node) {
1072
		/* If sysfs file of new node can't be created, cpu on the node
1073 1074
		 * can't be hot-added. There is no rollback way now.
		 * So, check by BUG_ON() to catch it reluctantly..
1075
		 * We online node here. We can't roll back from here.
1076
		 */
1077 1078
		node_set_online(nid);
		ret = __register_one_node(nid);
1079 1080 1081
		BUG_ON(ret);
	}

1082
	/* link memory sections under this node.*/
1083 1084
	ret = link_mem_sections(nid, PFN_DOWN(start), PFN_UP(start + size - 1),
				MEMINIT_HOTPLUG);
1085 1086
	BUG_ON(ret);

1087
	/* create new memmap entry */
1088 1089
	if (!strcmp(res->name, "System RAM"))
		firmware_map_add_hotplug(start, start + size, "System RAM");
1090

1091 1092 1093
	/* device_online() will take the lock when calling online_pages() */
	mem_hotplug_done();

1094
	/* online pages if requested */
1095
	if (memhp_default_online_type != MMOP_OFFLINE)
1096
		walk_memory_blocks(start, size, NULL, online_memory_block);
1097

1098
	return ret;
1099 1100
error:
	/* rollback pgdat allocation and others */
1101 1102
	if (new_node)
		rollback_node_hotadd(nid);
1103 1104
	if (IS_ENABLED(CONFIG_ARCH_KEEP_MEMBLOCK))
		memblock_remove(start, size);
1105
	mem_hotplug_done();
1106 1107
	return ret;
}
1108

1109 1110
/* requires device_hotplug_lock, see add_memory_resource() */
int __ref __add_memory(int nid, u64 start, u64 size)
1111 1112 1113 1114
{
	struct resource *res;
	int ret;

1115
	res = register_memory_resource(start, size, "System RAM");
1116 1117
	if (IS_ERR(res))
		return PTR_ERR(res);
1118

1119
	ret = add_memory_resource(nid, res);
1120 1121 1122 1123
	if (ret < 0)
		release_memory_resource(res);
	return ret;
}
1124 1125 1126 1127 1128 1129 1130 1131 1132 1133 1134

int add_memory(int nid, u64 start, u64 size)
{
	int rc;

	lock_device_hotplug();
	rc = __add_memory(nid, start, size);
	unlock_device_hotplug();

	return rc;
}
1135
EXPORT_SYMBOL_GPL(add_memory);
K
KAMEZAWA Hiroyuki 已提交
1136

1137 1138 1139 1140 1141 1142 1143 1144 1145 1146 1147 1148 1149 1150 1151 1152 1153 1154 1155 1156 1157 1158 1159 1160 1161 1162 1163 1164 1165 1166 1167 1168 1169 1170 1171 1172 1173 1174 1175 1176 1177 1178 1179 1180 1181 1182 1183 1184 1185 1186
/*
 * Add special, driver-managed memory to the system as system RAM. Such
 * memory is not exposed via the raw firmware-provided memmap as system
 * RAM, instead, it is detected and added by a driver - during cold boot,
 * after a reboot, and after kexec.
 *
 * Reasons why this memory should not be used for the initial memmap of a
 * kexec kernel or for placing kexec images:
 * - The booting kernel is in charge of determining how this memory will be
 *   used (e.g., use persistent memory as system RAM)
 * - Coordination with a hypervisor is required before this memory
 *   can be used (e.g., inaccessible parts).
 *
 * For this memory, no entries in /sys/firmware/memmap ("raw firmware-provided
 * memory map") are created. Also, the created memory resource is flagged
 * with IORESOURCE_MEM_DRIVER_MANAGED, so in-kernel users can special-case
 * this memory as well (esp., not place kexec images onto it).
 *
 * The resource_name (visible via /proc/iomem) has to have the format
 * "System RAM ($DRIVER)".
 */
int add_memory_driver_managed(int nid, u64 start, u64 size,
			      const char *resource_name)
{
	struct resource *res;
	int rc;

	if (!resource_name ||
	    strstr(resource_name, "System RAM (") != resource_name ||
	    resource_name[strlen(resource_name) - 1] != ')')
		return -EINVAL;

	lock_device_hotplug();

	res = register_memory_resource(start, size, resource_name);
	if (IS_ERR(res)) {
		rc = PTR_ERR(res);
		goto out_unlock;
	}

	rc = add_memory_resource(nid, res);
	if (rc < 0)
		release_memory_resource(res);

out_unlock:
	unlock_device_hotplug();
	return rc;
}
EXPORT_SYMBOL_GPL(add_memory_driver_managed);

K
KAMEZAWA Hiroyuki 已提交
1187 1188
#ifdef CONFIG_MEMORY_HOTREMOVE
/*
1189 1190
 * Confirm all pages in a range [start, end) belong to the same zone (skipping
 * memory holes). When true, return the zone.
K
KAMEZAWA Hiroyuki 已提交
1191
 */
1192 1193
struct zone *test_pages_in_a_zone(unsigned long start_pfn,
				  unsigned long end_pfn)
K
KAMEZAWA Hiroyuki 已提交
1194
{
1195
	unsigned long pfn, sec_end_pfn;
K
KAMEZAWA Hiroyuki 已提交
1196 1197 1198
	struct zone *zone = NULL;
	struct page *page;
	int i;
1199
	for (pfn = start_pfn, sec_end_pfn = SECTION_ALIGN_UP(start_pfn + 1);
K
KAMEZAWA Hiroyuki 已提交
1200
	     pfn < end_pfn;
1201
	     pfn = sec_end_pfn, sec_end_pfn += PAGES_PER_SECTION) {
1202 1203
		/* Make sure the memory section is present first */
		if (!present_section_nr(pfn_to_section_nr(pfn)))
K
KAMEZAWA Hiroyuki 已提交
1204
			continue;
1205 1206 1207 1208 1209 1210 1211
		for (; pfn < sec_end_pfn && pfn < end_pfn;
		     pfn += MAX_ORDER_NR_PAGES) {
			i = 0;
			/* This is just a CONFIG_HOLES_IN_ZONE check.*/
			while ((i < MAX_ORDER_NR_PAGES) &&
				!pfn_valid_within(pfn + i))
				i++;
1212
			if (i == MAX_ORDER_NR_PAGES || pfn + i >= end_pfn)
1213
				continue;
1214 1215
			/* Check if we got outside of the zone */
			if (zone && !zone_spans_pfn(zone, pfn + i))
1216
				return NULL;
1217 1218
			page = pfn_to_page(pfn + i);
			if (zone && page_zone(page) != zone)
1219
				return NULL;
1220 1221
			zone = page_zone(page);
		}
K
KAMEZAWA Hiroyuki 已提交
1222
	}
1223

1224
	return zone;
K
KAMEZAWA Hiroyuki 已提交
1225 1226 1227
}

/*
1228
 * Scan pfn range [start,end) to find movable/migratable pages (LRU pages,
1229 1230 1231 1232 1233 1234 1235 1236
 * non-lru movable pages and hugepages). Will skip over most unmovable
 * pages (esp., pages that can be skipped when offlining), but bail out on
 * definitely unmovable pages.
 *
 * Returns:
 *	0 in case a movable page is found and movable_pfn was updated.
 *	-ENOENT in case no movable page was found.
 *	-EBUSY in case a definitely unmovable page was found.
K
KAMEZAWA Hiroyuki 已提交
1237
 */
1238 1239
static int scan_movable_pages(unsigned long start, unsigned long end,
			      unsigned long *movable_pfn)
K
KAMEZAWA Hiroyuki 已提交
1240 1241
{
	unsigned long pfn;
1242

K
KAMEZAWA Hiroyuki 已提交
1243
	for (pfn = start; pfn < end; pfn++) {
1244 1245 1246 1247 1248 1249 1250
		struct page *page, *head;
		unsigned long skip;

		if (!pfn_valid(pfn))
			continue;
		page = pfn_to_page(pfn);
		if (PageLRU(page))
1251
			goto found;
1252
		if (__PageMovable(page))
1253 1254 1255 1256 1257 1258 1259 1260 1261 1262
			goto found;

		/*
		 * PageOffline() pages that are not marked __PageMovable() and
		 * have a reference count > 0 (after MEM_GOING_OFFLINE) are
		 * definitely unmovable. If their reference count would be 0,
		 * they could at least be skipped when offlining memory.
		 */
		if (PageOffline(page) && page_count(page))
			return -EBUSY;
1263 1264 1265 1266

		if (!PageHuge(page))
			continue;
		head = compound_head(page);
1267
		if (page_huge_active(head))
1268
			goto found;
1269
		skip = compound_nr(head) - (page - head);
1270
		pfn += skip - 1;
K
KAMEZAWA Hiroyuki 已提交
1271
	}
1272 1273 1274
	return -ENOENT;
found:
	*movable_pfn = pfn;
K
KAMEZAWA Hiroyuki 已提交
1275 1276 1277
	return 0;
}

1278
static struct page *new_node_page(struct page *page, unsigned long private)
1279
{
1280
	nodemask_t nmask = node_states[N_MEMORY];
1281 1282 1283 1284 1285
	struct migration_target_control mtc = {
		.nid = page_to_nid(page),
		.nmask = &nmask,
		.gfp_mask = GFP_USER | __GFP_MOVABLE | __GFP_RETRY_MAYFAIL,
	};
1286 1287 1288 1289 1290 1291

	/*
	 * try to allocate from a different node but reuse this node if there
	 * are no other online nodes to be used (e.g. we are offlining a part
	 * of the only existing node)
	 */
1292
	node_clear(mtc.nid, nmask);
1293
	if (nodes_empty(nmask))
1294
		node_set(mtc.nid, nmask);
1295

1296
	return alloc_migration_target(page, (unsigned long)&mtc);
1297 1298
}

K
KAMEZAWA Hiroyuki 已提交
1299 1300 1301 1302
static int
do_migrate_range(unsigned long start_pfn, unsigned long end_pfn)
{
	unsigned long pfn;
1303
	struct page *page, *head;
K
KAMEZAWA Hiroyuki 已提交
1304 1305 1306
	int ret = 0;
	LIST_HEAD(source);

1307
	for (pfn = start_pfn; pfn < end_pfn; pfn++) {
K
KAMEZAWA Hiroyuki 已提交
1308 1309 1310
		if (!pfn_valid(pfn))
			continue;
		page = pfn_to_page(pfn);
1311
		head = compound_head(page);
1312 1313

		if (PageHuge(page)) {
1314
			pfn = page_to_pfn(head) + compound_nr(head) - 1;
1315
			isolate_huge_page(head, &source);
1316
			continue;
M
Michal Hocko 已提交
1317
		} else if (PageTransHuge(page))
1318
			pfn = page_to_pfn(head) + thp_nr_pages(page) - 1;
1319

1320 1321 1322 1323 1324 1325 1326 1327 1328 1329 1330 1331 1332 1333 1334
		/*
		 * HWPoison pages have elevated reference counts so the migration would
		 * fail on them. It also doesn't make any sense to migrate them in the
		 * first place. Still try to unmap such a page in case it is still mapped
		 * (e.g. current hwpoison implementation doesn't unmap KSM pages but keep
		 * the unmap as the catch all safety net).
		 */
		if (PageHWPoison(page)) {
			if (WARN_ON(PageLRU(page)))
				isolate_lru_page(page);
			if (page_mapped(page))
				try_to_unmap(page, TTU_IGNORE_MLOCK | TTU_IGNORE_ACCESS);
			continue;
		}

1335
		if (!get_page_unless_zero(page))
K
KAMEZAWA Hiroyuki 已提交
1336 1337
			continue;
		/*
1338 1339
		 * We can skip free pages. And we can deal with pages on
		 * LRU and non-lru movable pages.
K
KAMEZAWA Hiroyuki 已提交
1340
		 */
1341 1342 1343 1344
		if (PageLRU(page))
			ret = isolate_lru_page(page);
		else
			ret = isolate_movable_page(page, ISOLATE_UNEVICTABLE);
K
KAMEZAWA Hiroyuki 已提交
1345
		if (!ret) { /* Success */
1346
			list_add_tail(&page->lru, &source);
1347 1348
			if (!__PageMovable(page))
				inc_node_page_state(page, NR_ISOLATED_ANON +
H
Huang Ying 已提交
1349
						    page_is_file_lru(page));
1350

K
KAMEZAWA Hiroyuki 已提交
1351
		} else {
1352
			pr_warn("failed to isolate pfn %lx\n", pfn);
1353
			dump_page(page, "isolation failed");
K
KAMEZAWA Hiroyuki 已提交
1354
		}
1355
		put_page(page);
K
KAMEZAWA Hiroyuki 已提交
1356
	}
1357
	if (!list_empty(&source)) {
1358 1359
		/* Allocate a new page from the nearest neighbor node */
		ret = migrate_pages(&source, new_node_page, NULL, 0,
1360
					MIGRATE_SYNC, MR_MEMORY_HOTPLUG);
1361 1362 1363 1364 1365 1366
		if (ret) {
			list_for_each_entry(page, &source, lru) {
				pr_warn("migrating pfn %lx failed ret:%d ",
				       page_to_pfn(page), ret);
				dump_page(page, "migration failure");
			}
1367
			putback_movable_pages(&source);
1368
		}
K
KAMEZAWA Hiroyuki 已提交
1369
	}
1370

K
KAMEZAWA Hiroyuki 已提交
1371 1372 1373
	return ret;
}

1374 1375
static int __init cmdline_parse_movable_node(char *p)
{
1376
	movable_node_enabled = true;
1377 1378 1379 1380
	return 0;
}
early_param("movable_node", cmdline_parse_movable_node);

1381 1382 1383 1384 1385 1386
/* check which state of node_states will be changed when offline memory */
static void node_states_check_changes_offline(unsigned long nr_pages,
		struct zone *zone, struct memory_notify *arg)
{
	struct pglist_data *pgdat = zone->zone_pgdat;
	unsigned long present_pages = 0;
1387
	enum zone_type zt;
1388

1389 1390 1391
	arg->status_change_nid = NUMA_NO_NODE;
	arg->status_change_nid_normal = NUMA_NO_NODE;
	arg->status_change_nid_high = NUMA_NO_NODE;
1392 1393

	/*
1394 1395 1396 1397 1398 1399
	 * Check whether node_states[N_NORMAL_MEMORY] will be changed.
	 * If the memory to be offline is within the range
	 * [0..ZONE_NORMAL], and it is the last present memory there,
	 * the zones in that range will become empty after the offlining,
	 * thus we can determine that we need to clear the node from
	 * node_states[N_NORMAL_MEMORY].
1400
	 */
1401
	for (zt = 0; zt <= ZONE_NORMAL; zt++)
1402
		present_pages += pgdat->node_zones[zt].present_pages;
1403
	if (zone_idx(zone) <= ZONE_NORMAL && nr_pages >= present_pages)
1404 1405
		arg->status_change_nid_normal = zone_to_nid(zone);

1406 1407
#ifdef CONFIG_HIGHMEM
	/*
1408 1409 1410 1411 1412 1413
	 * node_states[N_HIGH_MEMORY] contains nodes which
	 * have normal memory or high memory.
	 * Here we add the present_pages belonging to ZONE_HIGHMEM.
	 * If the zone is within the range of [0..ZONE_HIGHMEM), and
	 * we determine that the zones in that range become empty,
	 * we need to clear the node for N_HIGH_MEMORY.
1414
	 */
1415 1416
	present_pages += pgdat->node_zones[ZONE_HIGHMEM].present_pages;
	if (zone_idx(zone) <= ZONE_HIGHMEM && nr_pages >= present_pages)
1417 1418 1419
		arg->status_change_nid_high = zone_to_nid(zone);
#endif

1420
	/*
1421 1422 1423 1424 1425 1426 1427 1428
	 * We have accounted the pages from [0..ZONE_NORMAL), and
	 * in case of CONFIG_HIGHMEM the pages from ZONE_HIGHMEM
	 * as well.
	 * Here we count the possible pages from ZONE_MOVABLE.
	 * If after having accounted all the pages, we see that the nr_pages
	 * to be offlined is over or equal to the accounted pages,
	 * we know that the node will become empty, and so, we can clear
	 * it for N_MEMORY as well.
1429
	 */
1430
	present_pages += pgdat->node_zones[ZONE_MOVABLE].present_pages;
1431 1432 1433 1434 1435 1436 1437 1438 1439 1440

	if (nr_pages >= present_pages)
		arg->status_change_nid = zone_to_nid(zone);
}

static void node_states_clear_node(int node, struct memory_notify *arg)
{
	if (arg->status_change_nid_normal >= 0)
		node_clear_state(node, N_NORMAL_MEMORY);

1441
	if (arg->status_change_nid_high >= 0)
1442
		node_clear_state(node, N_HIGH_MEMORY);
1443

1444
	if (arg->status_change_nid >= 0)
1445
		node_clear_state(node, N_MEMORY);
1446 1447
}

1448 1449 1450 1451 1452 1453 1454 1455 1456
static int count_system_ram_pages_cb(unsigned long start_pfn,
				     unsigned long nr_pages, void *data)
{
	unsigned long *nr_system_ram_pages = data;

	*nr_system_ram_pages += nr_pages;
	return 0;
}

1457
int __ref offline_pages(unsigned long start_pfn, unsigned long nr_pages)
K
KAMEZAWA Hiroyuki 已提交
1458
{
1459
	const unsigned long end_pfn = start_pfn + nr_pages;
1460
	unsigned long pfn, system_ram_pages = 0;
1461
	unsigned long flags;
K
KAMEZAWA Hiroyuki 已提交
1462
	struct zone *zone;
1463
	struct memory_notify arg;
1464
	int ret, node;
1465
	char *reason;
K
KAMEZAWA Hiroyuki 已提交
1466

1467 1468 1469 1470 1471
	/* We can only offline full sections (e.g., SECTION_IS_ONLINE) */
	if (WARN_ON_ONCE(!nr_pages ||
			 !IS_ALIGNED(start_pfn | nr_pages, PAGES_PER_SECTION)))
		return -EINVAL;

1472 1473
	mem_hotplug_begin();

1474 1475 1476 1477 1478 1479 1480 1481
	/*
	 * Don't allow to offline memory blocks that contain holes.
	 * Consequently, memory blocks with holes can never get onlined
	 * via the hotplug path - online_pages() - as hotplugged memory has
	 * no holes. This way, we e.g., don't have to worry about marking
	 * memory holes PG_reserved, don't need pfn_valid() checks, and can
	 * avoid using walk_system_ram_range() later.
	 */
1482
	walk_system_ram_range(start_pfn, nr_pages, &system_ram_pages,
1483
			      count_system_ram_pages_cb);
1484
	if (system_ram_pages != nr_pages) {
1485 1486 1487 1488 1489
		ret = -EINVAL;
		reason = "memory holes";
		goto failed_removal;
	}

K
KAMEZAWA Hiroyuki 已提交
1490 1491
	/* This makes hotplug much easier...and readable.
	   we assume this for now. .*/
1492 1493
	zone = test_pages_in_a_zone(start_pfn, end_pfn);
	if (!zone) {
1494 1495 1496
		ret = -EINVAL;
		reason = "multizone range";
		goto failed_removal;
1497
	}
1498 1499
	node = zone_to_nid(zone);

K
KAMEZAWA Hiroyuki 已提交
1500
	/* set above range as isolated */
1501
	ret = start_isolate_page_range(start_pfn, end_pfn,
1502
				       MIGRATE_MOVABLE,
1503
				       MEMORY_OFFLINE | REPORT_FAILURE);
1504
	if (ret) {
1505 1506
		reason = "failure to isolate range";
		goto failed_removal;
1507
	}
1508 1509 1510

	arg.start_pfn = start_pfn;
	arg.nr_pages = nr_pages;
1511
	node_states_check_changes_offline(nr_pages, zone, &arg);
1512 1513 1514

	ret = memory_notify(MEM_GOING_OFFLINE, &arg);
	ret = notifier_to_errno(ret);
1515 1516 1517 1518
	if (ret) {
		reason = "notifier failure";
		goto failed_removal_isolated;
	}
1519

1520
	do {
1521 1522
		pfn = start_pfn;
		do {
1523 1524 1525 1526 1527
			if (signal_pending(current)) {
				ret = -EINTR;
				reason = "signal backoff";
				goto failed_removal_isolated;
			}
1528

1529 1530 1531
			cond_resched();
			lru_add_drain_all();

1532 1533
			ret = scan_movable_pages(pfn, end_pfn, &pfn);
			if (!ret) {
1534 1535 1536 1537 1538 1539
				/*
				 * TODO: fatal migration failures should bail
				 * out
				 */
				do_migrate_range(pfn, end_pfn);
			}
1540 1541 1542 1543 1544
		} while (!ret);

		if (ret != -ENOENT) {
			reason = "unmovable page";
			goto failed_removal_isolated;
1545
		}
K
KAMEZAWA Hiroyuki 已提交
1546

1547 1548 1549 1550 1551 1552 1553 1554 1555 1556
		/*
		 * Dissolve free hugepages in the memory block before doing
		 * offlining actually in order to make hugetlbfs's object
		 * counting consistent.
		 */
		ret = dissolve_free_huge_pages(start_pfn, end_pfn);
		if (ret) {
			reason = "failure to dissolve huge pages";
			goto failed_removal_isolated;
		}
1557

1558 1559 1560 1561 1562 1563 1564 1565 1566 1567 1568 1569
		/*
		 * per-cpu pages are drained in start_isolate_page_range, but if
		 * there are still pages that are not free, make sure that we
		 * drain again, because when we isolated range we might
		 * have raced with another thread that was adding pages to pcp
		 * list.
		 *
		 * Forward progress should be still guaranteed because
		 * pages on the pcp list can only belong to MOVABLE_ZONE
		 * because has_unmovable_pages explicitly checks for
		 * PageBuddy on freed pages on other zones.
		 */
1570
		ret = test_pages_isolated(start_pfn, end_pfn, MEMORY_OFFLINE);
1571 1572
		if (ret)
			drain_all_pages(zone);
1573
	} while (ret);
1574

1575 1576 1577 1578
	/* Mark all sections offline and remove free pages from the buddy. */
	__offline_isolated_pages(start_pfn, end_pfn);
	pr_info("Offlined Pages %ld\n", nr_pages);

1579 1580 1581 1582 1583 1584
	/*
	 * Onlining will reset pagetype flags and makes migrate type
	 * MOVABLE, so just need to decrease the number of isolated
	 * pageblocks zone counter here.
	 */
	spin_lock_irqsave(&zone->lock, flags);
1585
	zone->nr_isolate_pageblock -= nr_pages / pageblock_nr_pages;
1586 1587
	spin_unlock_irqrestore(&zone->lock, flags);

K
KAMEZAWA Hiroyuki 已提交
1588
	/* removal success */
1589 1590
	adjust_managed_page_count(pfn_to_page(start_pfn), -nr_pages);
	zone->present_pages -= nr_pages;
1591 1592

	pgdat_resize_lock(zone->zone_pgdat, &flags);
1593
	zone->zone_pgdat->node_present_pages -= nr_pages;
1594
	pgdat_resize_unlock(zone->zone_pgdat, &flags);
1595

1596 1597
	init_per_zone_wmark_min();

1598
	if (!populated_zone(zone)) {
1599
		zone_pcp_reset(zone);
1600
		build_all_zonelists(NULL);
1601 1602
	} else
		zone_pcp_update(zone);
1603

1604
	node_states_clear_node(node, &arg);
1605
	if (arg.status_change_nid >= 0) {
1606
		kswapd_stop(node);
1607 1608
		kcompactd_stop(node);
	}
1609

K
KAMEZAWA Hiroyuki 已提交
1610
	writeback_set_ratelimit();
1611 1612

	memory_notify(MEM_OFFLINE, &arg);
1613
	remove_pfn_range_from_zone(zone, start_pfn, nr_pages);
1614
	mem_hotplug_done();
K
KAMEZAWA Hiroyuki 已提交
1615 1616
	return 0;

1617 1618
failed_removal_isolated:
	undo_isolate_page_range(start_pfn, end_pfn, MIGRATE_MOVABLE);
1619
	memory_notify(MEM_CANCEL_OFFLINE, &arg);
K
KAMEZAWA Hiroyuki 已提交
1620
failed_removal:
1621
	pr_debug("memory offlining [mem %#010llx-%#010llx] failed due to %s\n",
1622
		 (unsigned long long) start_pfn << PAGE_SHIFT,
1623 1624
		 ((unsigned long long) end_pfn << PAGE_SHIFT) - 1,
		 reason);
K
KAMEZAWA Hiroyuki 已提交
1625
	/* pushback to free area */
1626
	mem_hotplug_done();
K
KAMEZAWA Hiroyuki 已提交
1627 1628
	return ret;
}
1629

1630
static int check_memblock_offlined_cb(struct memory_block *mem, void *arg)
1631 1632 1633
{
	int ret = !is_memblock_offlined(mem);

1634 1635 1636 1637
	if (unlikely(ret)) {
		phys_addr_t beginpa, endpa;

		beginpa = PFN_PHYS(section_nr_to_pfn(mem->start_section_nr));
1638
		endpa = beginpa + memory_block_size_bytes() - 1;
J
Joe Perches 已提交
1639
		pr_warn("removing memory fails, because memory [%pa-%pa] is onlined\n",
1640
			&beginpa, &endpa);
1641

1642 1643 1644
		return -EBUSY;
	}
	return 0;
1645 1646
}

1647
static int check_cpu_on_node(pg_data_t *pgdat)
1648 1649 1650 1651 1652 1653 1654 1655 1656 1657 1658 1659 1660 1661 1662
{
	int cpu;

	for_each_present_cpu(cpu) {
		if (cpu_to_node(cpu) == pgdat->node_id)
			/*
			 * the cpu on this node isn't removed, and we can't
			 * offline this node.
			 */
			return -EBUSY;
	}

	return 0;
}

1663 1664 1665 1666 1667 1668 1669 1670 1671 1672 1673 1674
static int check_no_memblock_for_node_cb(struct memory_block *mem, void *arg)
{
	int nid = *(int *)arg;

	/*
	 * If a memory block belongs to multiple nodes, the stored nid is not
	 * reliable. However, such blocks are always online (e.g., cannot get
	 * offlined) and, therefore, are still spanned by the node.
	 */
	return mem->nid == nid ? -EEXIST : 0;
}

1675 1676
/**
 * try_offline_node
1677
 * @nid: the node ID
1678 1679 1680 1681 1682 1683
 *
 * Offline a node if all memory sections and cpus of the node are removed.
 *
 * NOTE: The caller must call lock_device_hotplug() to serialize hotplug
 * and online/offline operations before this call.
 */
1684
void try_offline_node(int nid)
1685
{
1686
	pg_data_t *pgdat = NODE_DATA(nid);
1687
	int rc;
1688

1689 1690 1691 1692 1693 1694 1695
	/*
	 * If the node still spans pages (especially ZONE_DEVICE), don't
	 * offline it. A node spans memory after move_pfn_range_to_zone(),
	 * e.g., after the memory block was onlined.
	 */
	if (pgdat->node_spanned_pages)
		return;
1696

1697 1698 1699 1700 1701 1702 1703
	/*
	 * Especially offline memory blocks might not be spanned by the
	 * node. They will get spanned by the node once they get onlined.
	 * However, they link to the node in sysfs and can get onlined later.
	 */
	rc = for_each_memory_block(&nid, check_no_memblock_for_node_cb);
	if (rc)
1704 1705
		return;

1706
	if (check_cpu_on_node(pgdat))
1707 1708 1709 1710 1711 1712 1713 1714 1715
		return;

	/*
	 * all memory/cpu of this node are removed, we can offline this
	 * node now.
	 */
	node_set_offline(nid);
	unregister_one_node(nid);
}
1716
EXPORT_SYMBOL(try_offline_node);
1717

1718 1719 1720 1721 1722 1723 1724 1725 1726 1727 1728 1729 1730 1731 1732 1733 1734 1735 1736 1737
static void __release_memory_resource(resource_size_t start,
				      resource_size_t size)
{
	int ret;

	/*
	 * When removing memory in the same granularity as it was added,
	 * this function never fails. It might only fail if resources
	 * have to be adjusted or split. We'll ignore the error, as
	 * removing of memory cannot fail.
	 */
	ret = release_mem_region_adjustable(&iomem_resource, start, size);
	if (ret) {
		resource_size_t endres = start + size - 1;

		pr_warn("Unable to release resource <%pa-%pa> (%d)\n",
			&start, &endres, ret);
	}
}

1738
static int __ref try_remove_memory(int nid, u64 start, u64 size)
1739
{
1740
	int rc = 0;
1741

1742 1743
	BUG_ON(check_hotplug_memory_range(start, size));

1744
	/*
1745
	 * All memory blocks must be offlined before removing memory.  Check
1746
	 * whether all memory blocks in question are offline and return error
1747
	 * if this is not the case.
1748
	 */
1749
	rc = walk_memory_blocks(start, size, NULL, check_memblock_offlined_cb);
1750
	if (rc)
1751
		return rc;
1752

1753 1754
	/* remove memmap entry */
	firmware_map_remove(start, start + size, "System RAM");
1755

1756 1757 1758 1759
	/*
	 * Memory block device removal under the device_hotplug_lock is
	 * a barrier against racing online attempts.
	 */
1760
	remove_memory_block_devices(start, size);
1761

1762 1763
	mem_hotplug_begin();

1764
	arch_remove_memory(nid, start, size, NULL);
1765 1766 1767 1768 1769 1770

	if (IS_ENABLED(CONFIG_ARCH_KEEP_MEMBLOCK)) {
		memblock_free(start, size);
		memblock_remove(start, size);
	}

1771
	__release_memory_resource(start, size);
1772

1773 1774
	try_offline_node(nid);

1775
	mem_hotplug_done();
1776
	return 0;
1777
}
1778

1779 1780 1781 1782 1783 1784 1785 1786 1787 1788 1789 1790 1791 1792
/**
 * remove_memory
 * @nid: the node ID
 * @start: physical address of the region to remove
 * @size: size of the region to remove
 *
 * NOTE: The caller must call lock_device_hotplug() to serialize hotplug
 * and online/offline operations before this call, as required by
 * try_offline_node().
 */
void __remove_memory(int nid, u64 start, u64 size)
{

	/*
S
Souptick Joarder 已提交
1793
	 * trigger BUG() if some memory is not offlined prior to calling this
1794 1795 1796 1797 1798 1799 1800 1801 1802 1803 1804
	 * function
	 */
	if (try_remove_memory(nid, start, size))
		BUG();
}

/*
 * Remove memory if every memory block is offline, otherwise return -EBUSY is
 * some memory is not offline
 */
int remove_memory(int nid, u64 start, u64 size)
1805
{
1806 1807
	int rc;

1808
	lock_device_hotplug();
1809
	rc  = try_remove_memory(nid, start, size);
1810
	unlock_device_hotplug();
1811 1812

	return rc;
1813
}
1814
EXPORT_SYMBOL_GPL(remove_memory);
1815 1816 1817 1818 1819 1820 1821 1822 1823 1824 1825 1826 1827 1828 1829 1830 1831 1832 1833 1834 1835 1836 1837 1838 1839 1840 1841 1842 1843 1844 1845 1846 1847 1848 1849 1850 1851

/*
 * Try to offline and remove a memory block. Might take a long time to
 * finish in case memory is still in use. Primarily useful for memory devices
 * that logically unplugged all memory (so it's no longer in use) and want to
 * offline + remove the memory block.
 */
int offline_and_remove_memory(int nid, u64 start, u64 size)
{
	struct memory_block *mem;
	int rc = -EINVAL;

	if (!IS_ALIGNED(start, memory_block_size_bytes()) ||
	    size != memory_block_size_bytes())
		return rc;

	lock_device_hotplug();
	mem = find_memory_block(__pfn_to_section(PFN_DOWN(start)));
	if (mem)
		rc = device_offline(&mem->dev);
	/* Ignore if the device is already offline. */
	if (rc > 0)
		rc = 0;

	/*
	 * In case we succeeded to offline the memory block, remove it.
	 * This cannot fail as it cannot get onlined in the meantime.
	 */
	if (!rc) {
		rc = try_remove_memory(nid, start, size);
		WARN_ON_ONCE(rc);
	}
	unlock_device_hotplug();

	return rc;
}
EXPORT_SYMBOL_GPL(offline_and_remove_memory);
1852
#endif /* CONFIG_MEMORY_HOTREMOVE */