memory_hotplug.c 48.4 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
/* find the smallest valid pfn in the range [start_pfn, end_pfn) */
354
static unsigned long find_smallest_section_pfn(int nid, struct zone *zone,
355 356 357
				     unsigned long start_pfn,
				     unsigned long end_pfn)
{
358
	for (; start_pfn < end_pfn; start_pfn += PAGES_PER_SUBSECTION) {
359
		if (unlikely(!pfn_to_online_page(start_pfn)))
360 361 362 363 364
			continue;

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

365
		if (zone != page_zone(pfn_to_page(start_pfn)))
366 367 368 369 370 371 372 373 374
			continue;

		return start_pfn;
	}

	return 0;
}

/* find the biggest valid pfn in the range [start_pfn, end_pfn). */
375
static unsigned long find_biggest_section_pfn(int nid, struct zone *zone,
376 377 378 379 380 381 382
				    unsigned long start_pfn,
				    unsigned long end_pfn)
{
	unsigned long pfn;

	/* pfn is the end pfn of a memory section. */
	pfn = end_pfn - 1;
383
	for (; pfn >= start_pfn; pfn -= PAGES_PER_SUBSECTION) {
384
		if (unlikely(!pfn_to_online_page(pfn)))
385 386 387 388 389
			continue;

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

390
		if (zone != page_zone(pfn_to_page(pfn)))
391 392 393 394 395 396 397 398 399 400 401 402 403 404 405
			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);
406
	if (zone->zone_start_pfn == start_pfn) {
407 408 409 410 411 412 413
		/*
		 * 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,
414
						zone_end_pfn(zone));
415
		if (pfn) {
416
			zone->spanned_pages = zone_end_pfn(zone) - pfn;
417
			zone->zone_start_pfn = pfn;
418 419 420
		} else {
			zone->zone_start_pfn = 0;
			zone->spanned_pages = 0;
421
		}
422
	} else if (zone_end_pfn(zone) == end_pfn) {
423 424 425 426 427 428
		/*
		 * 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.
		 */
429
		pfn = find_biggest_section_pfn(nid, zone, zone->zone_start_pfn,
430 431
					       start_pfn);
		if (pfn)
432
			zone->spanned_pages = pfn - zone->zone_start_pfn + 1;
433 434 435 436
		else {
			zone->zone_start_pfn = 0;
			zone->spanned_pages = 0;
		}
437 438 439 440
	}
	zone_span_writeunlock(zone);
}

441
static void update_pgdat_span(struct pglist_data *pgdat)
442
{
443 444 445 446 447 448 449 450 451
	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. */
452 453 454 455 456 457 458 459
		if (!zone->spanned_pages)
			continue;
		if (!node_end_pfn) {
			node_start_pfn = zone->zone_start_pfn;
			node_end_pfn = zone_end_pfn;
			continue;
		}

460 461 462 463
		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;
464 465
	}

466 467
	pgdat->node_start_pfn = node_start_pfn;
	pgdat->node_spanned_pages = node_end_pfn - node_start_pfn;
468 469
}

470 471 472
void __ref remove_pfn_range_from_zone(struct zone *zone,
				      unsigned long start_pfn,
				      unsigned long nr_pages)
473 474 475 476
{
	struct pglist_data *pgdat = zone->zone_pgdat;
	unsigned long flags;

477 478 479
	/* Poison struct pages because they are now uninitialized again. */
	page_init_poison(pfn_to_page(start_pfn), sizeof(struct page) * nr_pages);

480 481 482 483 484 485 486 487 488 489
#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

490 491
	clear_zone_contiguous(zone);

492 493
	pgdat_resize_lock(zone->zone_pgdat, &flags);
	shrink_zone_span(zone, start_pfn, start_pfn + nr_pages);
494
	update_pgdat_span(pgdat);
495
	pgdat_resize_unlock(zone->zone_pgdat, &flags);
496 497

	set_zone_contiguous(zone);
498 499
}

500 501 502
static void __remove_section(unsigned long pfn, unsigned long nr_pages,
			     unsigned long map_offset,
			     struct vmem_altmap *altmap)
503
{
504
	struct mem_section *ms = __pfn_to_section(pfn);
505

506 507
	if (WARN_ON_ONCE(!valid_section(ms)))
		return;
508

509
	sparse_remove_section(ms, pfn, nr_pages, map_offset, altmap);
510 511 512
}

/**
513
 * __remove_pages() - remove sections of pages
514
 * @pfn: starting pageframe (must be aligned to start of a section)
515
 * @nr_pages: number of pages to remove (must be multiple of section size)
516
 * @altmap: alternative device page map or %NULL if default memmap is used
517 518 519 520 521 522
 *
 * 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().
 */
523 524
void __remove_pages(unsigned long pfn, unsigned long nr_pages,
		    struct vmem_altmap *altmap)
525
{
526 527
	const unsigned long end_pfn = pfn + nr_pages;
	unsigned long cur_nr_pages;
528 529
	unsigned long map_offset = 0;

530
	map_offset = vmem_altmap_offset(altmap);
531

532 533
	if (check_pfn_span(pfn, nr_pages, "remove"))
		return;
534

535
	for (; pfn < end_pfn; pfn += cur_nr_pages) {
536
		cond_resched();
537
		/* Select all remaining pages up to the next section boundary */
538 539
		cur_nr_pages = min(end_pfn - pfn,
				   SECTION_ALIGN_UP(pfn + 1) - pfn);
540
		__remove_section(pfn, cur_nr_pages, map_offset, altmap);
541
		map_offset = 0;
542 543 544
	}
}

545 546 547 548
int set_online_page_callback(online_page_callback_t callback)
{
	int rc = -EINVAL;

549 550
	get_online_mems();
	mutex_lock(&online_page_callback_lock);
551 552 553 554 555 556

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

557 558
	mutex_unlock(&online_page_callback_lock);
	put_online_mems();
559 560 561 562 563 564 565 566 567

	return rc;
}
EXPORT_SYMBOL_GPL(set_online_page_callback);

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

568 569
	get_online_mems();
	mutex_lock(&online_page_callback_lock);
570 571 572 573 574 575

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

576 577
	mutex_unlock(&online_page_callback_lock);
	put_online_mems();
578 579 580 581 582

	return rc;
}
EXPORT_SYMBOL_GPL(restore_online_page_callback);

583
void generic_online_page(struct page *page, unsigned int order)
584
{
585 586 587 588 589 590 591
	/*
	 * 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);
592 593 594 595 596 597 598
	__free_pages_core(page, order);
	totalram_pages_add(1UL << order);
#ifdef CONFIG_HIGHMEM
	if (PageHighMem(page))
		totalhigh_pages_add(1UL << order);
#endif
}
599
EXPORT_SYMBOL_GPL(generic_online_page);
600

601 602
static int online_pages_range(unsigned long start_pfn, unsigned long nr_pages,
			void *arg)
603
{
604 605 606 607 608 609 610 611 612 613 614
	const unsigned long end_pfn = start_pfn + nr_pages;
	unsigned long pfn;
	int order;

	/*
	 * Online the pages. The callback might decide to keep some pages
	 * PG_reserved (to add them to the buddy later), but we still account
	 * them as being online/belonging to this zone ("present").
	 */
	for (pfn = start_pfn; pfn < end_pfn; pfn += 1ul << order) {
		order = min(MAX_ORDER - 1, get_order(PFN_PHYS(end_pfn - pfn)));
615 616 617
		/* __free_pages_core() wants pfns to be aligned to the order */
		if (WARN_ON_ONCE(!IS_ALIGNED(pfn, 1ul << order)))
			order = 0;
618 619
		(*online_page_callback)(pfn_to_page(pfn), order);
	}
620

621 622
	/* mark all involved sections as online */
	online_mem_sections(start_pfn, end_pfn);
623

624
	*(unsigned long *)arg += nr_pages;
625 626 627
	return 0;
}

628 629 630 631 632 633
/* 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);

634 635 636
	arg->status_change_nid = NUMA_NO_NODE;
	arg->status_change_nid_normal = NUMA_NO_NODE;
	arg->status_change_nid_high = NUMA_NO_NODE;
637

638 639 640
	if (!node_state(nid, N_MEMORY))
		arg->status_change_nid = nid;
	if (zone_idx(zone) <= ZONE_NORMAL && !node_state(nid, N_NORMAL_MEMORY))
641
		arg->status_change_nid_normal = nid;
642
#ifdef CONFIG_HIGHMEM
643
	if (zone_idx(zone) <= ZONE_HIGHMEM && !node_state(nid, N_HIGH_MEMORY))
644 645
		arg->status_change_nid_high = nid;
#endif
646 647 648 649 650 651 652
}

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);

653 654 655
	if (arg->status_change_nid_high >= 0)
		node_set_state(node, N_HIGH_MEMORY);

656 657
	if (arg->status_change_nid >= 0)
		node_set_state(node, N_MEMORY);
658 659
}

660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679 680
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;

681 682 683 684 685 686
}
/*
 * 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.
 */
687 688
void __ref move_pfn_range_to_zone(struct zone *zone, unsigned long start_pfn,
		unsigned long nr_pages, struct vmem_altmap *altmap)
689 690 691 692
{
	struct pglist_data *pgdat = zone->zone_pgdat;
	int nid = pgdat->node_id;
	unsigned long flags;
693

694 695 696 697 698
	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);
699 700
	if (zone_is_empty(zone))
		init_currently_empty_zone(zone, start_pfn, nr_pages);
701 702 703 704 705 706 707 708 709 710 711
	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
	 */
712 713
	memmap_init_zone(nr_pages, nid, zone_idx(zone), start_pfn,
			MEMMAP_HOTPLUG, altmap);
714 715 716 717

	set_zone_contiguous(zone);
}

718 719 720 721 722
/*
 * 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.
 */
723
static struct zone *default_kernel_zone_for_pfn(int nid, unsigned long start_pfn,
724 725 726 727 728 729 730 731 732 733 734 735 736 737 738
		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];
}

739 740
static inline struct zone *default_zone_for_pfn(int nid, unsigned long start_pfn,
		unsigned long nr_pages)
741
{
742 743 744 745 746
	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);
747 748

	/*
749 750
	 * We inherit the existing zone in a simple case where zones do not
	 * overlap in the given range
751
	 */
752 753
	if (in_kernel ^ in_movable)
		return (in_kernel) ? kernel_zone : movable_zone;
754

755 756 757 758 759 760
	/*
	 * 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;
761 762
}

763 764
struct zone * zone_for_pfn_range(int online_type, int nid, unsigned start_pfn,
		unsigned long nr_pages)
765
{
766 767
	if (online_type == MMOP_ONLINE_KERNEL)
		return default_kernel_zone_for_pfn(nid, start_pfn, nr_pages);
768

769 770
	if (online_type == MMOP_ONLINE_MOVABLE)
		return &NODE_DATA(nid)->node_zones[ZONE_MOVABLE];
771

772
	return default_zone_for_pfn(nid, start_pfn, nr_pages);
773 774
}

775 776
int __ref online_pages(unsigned long pfn, unsigned long nr_pages,
		       int online_type, int nid)
777
{
778
	unsigned long flags;
779 780
	unsigned long onlined_pages = 0;
	struct zone *zone;
781
	int need_zonelists_rebuild = 0;
782 783
	int ret;
	struct memory_notify arg;
784

785 786
	mem_hotplug_begin();

787
	/* associate pfn range with the zone */
788 789
	zone = zone_for_pfn_range(online_type, nid, pfn, nr_pages);
	move_pfn_range_to_zone(zone, pfn, nr_pages, NULL);
790

791 792
	arg.start_pfn = pfn;
	arg.nr_pages = nr_pages;
793
	node_states_check_changes_online(nr_pages, zone, &arg);
794 795 796

	ret = memory_notify(MEM_GOING_ONLINE, &arg);
	ret = notifier_to_errno(ret);
797 798 799
	if (ret)
		goto failed_addition;

800 801 802 803 804
	/*
	 * 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.
	 */
805
	if (!populated_zone(zone)) {
806
		need_zonelists_rebuild = 1;
807
		setup_zone_pageset(zone);
808
	}
809

K
KAMEZAWA Hiroyuki 已提交
810
	ret = walk_system_ram_range(pfn, nr_pages, &onlined_pages,
811
		online_pages_range);
812
	if (ret) {
813
		/* not a single memory resource was applicable */
814 815
		if (need_zonelists_rebuild)
			zone_pcp_reset(zone);
816
		goto failed_addition;
817 818
	}

819
	zone->present_pages += onlined_pages;
820 821

	pgdat_resize_lock(zone->zone_pgdat, &flags);
822
	zone->zone_pgdat->node_present_pages += onlined_pages;
823 824
	pgdat_resize_unlock(zone->zone_pgdat, &flags);

825 826
	shuffle_zone(zone);

827 828 829 830 831
	node_states_set_node(nid, &arg);
	if (need_zonelists_rebuild)
		build_all_zonelists(NULL);
	else
		zone_pcp_update(zone);
832

833 834
	init_per_zone_wmark_min();

835 836
	kswapd_run(nid);
	kcompactd_run(nid);
837

838
	vm_total_pages = nr_free_pagecache_pages();
839

840
	writeback_set_ratelimit();
841

842
	memory_notify(MEM_ONLINE, &arg);
843
	mem_hotplug_done();
844
	return 0;
845 846 847 848 849 850

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);
851
	remove_pfn_range_from_zone(zone, pfn, nr_pages);
852
	mem_hotplug_done();
853
	return ret;
854
}
855
#endif /* CONFIG_MEMORY_HOTPLUG_SPARSE */
856

857 858 859 860 861 862 863 864 865 866
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;
}

867
/* we are OK calling __meminit stuff here - we have CONFIG_MEMORY_HOTPLUG */
868
static pg_data_t __ref *hotadd_new_pgdat(int nid)
869 870 871
{
	struct pglist_data *pgdat;

872 873 874 875 876
	pgdat = NODE_DATA(nid);
	if (!pgdat) {
		pgdat = arch_alloc_nodedata(nid);
		if (!pgdat)
			return NULL;
877

878 879
		pgdat->per_cpu_nodestats =
			alloc_percpu(struct per_cpu_nodestat);
880
		arch_refresh_nodedata(nid, pgdat);
881
	} else {
882
		int cpu;
883
		/*
884 885
		 * Reset the nr_zones, order and highest_zoneidx before reuse.
		 * Note that kswapd will init kswapd_highest_zoneidx properly
886 887
		 * when it starts in the near future.
		 */
888
		pgdat->nr_zones = 0;
889
		pgdat->kswapd_order = 0;
890
		pgdat->kswapd_highest_zoneidx = 0;
891 892 893 894 895 896
		for_each_online_cpu(cpu) {
			struct per_cpu_nodestat *p;

			p = per_cpu_ptr(pgdat->per_cpu_nodestats, cpu);
			memset(p, 0, sizeof(*p));
		}
897
	}
898 899

	/* we can use NODE_DATA(nid) from here */
900
	pgdat->node_id = nid;
901
	pgdat->node_start_pfn = 0;
902

903
	/* init node's zones as empty zones, we don't have any present pages.*/
904
	free_area_init_core_hotplug(nid);
905

906 907 908 909
	/*
	 * The node we allocated has no zone fallback lists. For avoiding
	 * to access not-initialized zonelist, build here.
	 */
910
	build_all_zonelists(pgdat);
911

912 913 914 915 916
	/*
	 * 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().
	 */
917
	reset_node_managed_pages(pgdat);
918 919
	reset_node_present_pages(pgdat);

920 921 922
	return pgdat;
}

923
static void rollback_node_hotadd(int nid)
924
{
925 926
	pg_data_t *pgdat = NODE_DATA(nid);

927
	arch_refresh_nodedata(nid, NULL);
928
	free_percpu(pgdat->per_cpu_nodestats);
929 930 931
	arch_free_nodedata(pgdat);
}

932

933 934
/**
 * try_online_node - online a node if offlined
935
 * @nid: the node ID
936
 * @set_node_online: Whether we want to online the node
937
 * called by cpu_up() to online a node without onlined memory.
938 939 940 941 942
 *
 * Returns:
 * 1 -> a new node has been allocated
 * 0 -> the node is already online
 * -ENOMEM -> the node could not be allocated
943
 */
944
static int __try_online_node(int nid, bool set_node_online)
945
{
946 947
	pg_data_t *pgdat;
	int ret = 1;
948

949 950 951
	if (node_online(nid))
		return 0;

952
	pgdat = hotadd_new_pgdat(nid);
953
	if (!pgdat) {
954
		pr_err("Cannot online node %d due to NULL pgdat\n", nid);
955 956 957
		ret = -ENOMEM;
		goto out;
	}
958 959 960 961 962 963

	if (set_node_online) {
		node_set_online(nid);
		ret = register_one_node(nid);
		BUG_ON(ret);
	}
964
out:
965 966 967 968 969 970 971 972 973 974 975
	return ret;
}

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

	mem_hotplug_begin();
976
	ret =  __try_online_node(nid, true);
977
	mem_hotplug_done();
978 979 980
	return ret;
}

981 982
static int check_hotplug_memory_range(u64 start, u64 size)
{
983
	/* memory range must be block size aligned */
984 985
	if (!size || !IS_ALIGNED(start, memory_block_size_bytes()) ||
	    !IS_ALIGNED(size, memory_block_size_bytes())) {
986
		pr_err("Block size [%#lx] unaligned hotplug range: start %#llx, size %#llx",
987
		       memory_block_size_bytes(), start, size);
988 989 990 991 992 993
		return -EINVAL;
	}

	return 0;
}

994 995
static int online_memory_block(struct memory_block *mem, void *arg)
{
996
	mem->online_type = memhp_default_online_type;
997
	return device_online(&mem->dev);
998 999
}

1000 1001 1002 1003 1004 1005
/*
 * 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
 */
1006
int __ref add_memory_resource(int nid, struct resource *res)
1007
{
1008
	struct mhp_params params = { .pgprot = PAGE_KERNEL };
1009
	u64 start, size;
1010
	bool new_node = false;
1011 1012
	int ret;

1013 1014 1015
	start = res->start;
	size = resource_size(res);

1016 1017 1018 1019
	ret = check_hotplug_memory_range(start, size);
	if (ret)
		return ret;

1020 1021 1022 1023 1024
	if (!node_possible(nid)) {
		WARN(1, "node %d was absent from the node_possible_map\n", nid);
		return -EINVAL;
	}

1025
	mem_hotplug_begin();
1026

1027 1028
	if (IS_ENABLED(CONFIG_ARCH_KEEP_MEMBLOCK))
		memblock_add_node(start, size, nid);
1029

1030
	ret = __try_online_node(nid, false);
1031 1032 1033
	if (ret < 0)
		goto error;
	new_node = ret;
1034

1035
	/* call arch's memory hotadd */
1036
	ret = arch_add_memory(nid, start, size, &params);
1037 1038 1039
	if (ret < 0)
		goto error;

1040 1041 1042 1043 1044 1045 1046
	/* 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;
	}

1047
	if (new_node) {
1048
		/* If sysfs file of new node can't be created, cpu on the node
1049 1050
		 * can't be hot-added. There is no rollback way now.
		 * So, check by BUG_ON() to catch it reluctantly..
1051
		 * We online node here. We can't roll back from here.
1052
		 */
1053 1054
		node_set_online(nid);
		ret = __register_one_node(nid);
1055 1056 1057
		BUG_ON(ret);
	}

1058
	/* link memory sections under this node.*/
1059
	ret = link_mem_sections(nid, PFN_DOWN(start), PFN_UP(start + size - 1));
1060 1061
	BUG_ON(ret);

1062
	/* create new memmap entry */
1063 1064
	if (!strcmp(res->name, "System RAM"))
		firmware_map_add_hotplug(start, start + size, "System RAM");
1065

1066 1067 1068
	/* device_online() will take the lock when calling online_pages() */
	mem_hotplug_done();

1069
	/* online pages if requested */
1070
	if (memhp_default_online_type != MMOP_OFFLINE)
1071
		walk_memory_blocks(start, size, NULL, online_memory_block);
1072

1073
	return ret;
1074 1075
error:
	/* rollback pgdat allocation and others */
1076 1077
	if (new_node)
		rollback_node_hotadd(nid);
1078 1079
	if (IS_ENABLED(CONFIG_ARCH_KEEP_MEMBLOCK))
		memblock_remove(start, size);
1080
	mem_hotplug_done();
1081 1082
	return ret;
}
1083

1084 1085
/* requires device_hotplug_lock, see add_memory_resource() */
int __ref __add_memory(int nid, u64 start, u64 size)
1086 1087 1088 1089
{
	struct resource *res;
	int ret;

1090
	res = register_memory_resource(start, size, "System RAM");
1091 1092
	if (IS_ERR(res))
		return PTR_ERR(res);
1093

1094
	ret = add_memory_resource(nid, res);
1095 1096 1097 1098
	if (ret < 0)
		release_memory_resource(res);
	return ret;
}
1099 1100 1101 1102 1103 1104 1105 1106 1107 1108 1109

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;
}
1110
EXPORT_SYMBOL_GPL(add_memory);
K
KAMEZAWA Hiroyuki 已提交
1111

1112 1113 1114 1115 1116 1117 1118 1119 1120 1121 1122 1123 1124 1125 1126 1127 1128 1129 1130 1131 1132 1133 1134 1135 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
/*
 * 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 已提交
1162 1163
#ifdef CONFIG_MEMORY_HOTREMOVE
/*
1164 1165
 * Confirm all pages in a range [start, end) belong to the same zone (skipping
 * memory holes). When true, return the zone.
K
KAMEZAWA Hiroyuki 已提交
1166
 */
1167 1168
struct zone *test_pages_in_a_zone(unsigned long start_pfn,
				  unsigned long end_pfn)
K
KAMEZAWA Hiroyuki 已提交
1169
{
1170
	unsigned long pfn, sec_end_pfn;
K
KAMEZAWA Hiroyuki 已提交
1171 1172 1173
	struct zone *zone = NULL;
	struct page *page;
	int i;
1174
	for (pfn = start_pfn, sec_end_pfn = SECTION_ALIGN_UP(start_pfn + 1);
K
KAMEZAWA Hiroyuki 已提交
1175
	     pfn < end_pfn;
1176
	     pfn = sec_end_pfn, sec_end_pfn += PAGES_PER_SECTION) {
1177 1178
		/* Make sure the memory section is present first */
		if (!present_section_nr(pfn_to_section_nr(pfn)))
K
KAMEZAWA Hiroyuki 已提交
1179
			continue;
1180 1181 1182 1183 1184 1185 1186
		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++;
1187
			if (i == MAX_ORDER_NR_PAGES || pfn + i >= end_pfn)
1188
				continue;
1189 1190
			/* Check if we got outside of the zone */
			if (zone && !zone_spans_pfn(zone, pfn + i))
1191
				return NULL;
1192 1193
			page = pfn_to_page(pfn + i);
			if (zone && page_zone(page) != zone)
1194
				return NULL;
1195 1196
			zone = page_zone(page);
		}
K
KAMEZAWA Hiroyuki 已提交
1197
	}
1198

1199
	return zone;
K
KAMEZAWA Hiroyuki 已提交
1200 1201 1202
}

/*
1203
 * Scan pfn range [start,end) to find movable/migratable pages (LRU pages,
1204 1205 1206 1207 1208 1209 1210 1211
 * 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 已提交
1212
 */
1213 1214
static int scan_movable_pages(unsigned long start, unsigned long end,
			      unsigned long *movable_pfn)
K
KAMEZAWA Hiroyuki 已提交
1215 1216
{
	unsigned long pfn;
1217

K
KAMEZAWA Hiroyuki 已提交
1218
	for (pfn = start; pfn < end; pfn++) {
1219 1220 1221 1222 1223 1224 1225
		struct page *page, *head;
		unsigned long skip;

		if (!pfn_valid(pfn))
			continue;
		page = pfn_to_page(pfn);
		if (PageLRU(page))
1226
			goto found;
1227
		if (__PageMovable(page))
1228 1229 1230 1231 1232 1233 1234 1235 1236 1237
			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;
1238 1239 1240 1241

		if (!PageHuge(page))
			continue;
		head = compound_head(page);
1242
		if (page_huge_active(head))
1243
			goto found;
1244
		skip = compound_nr(head) - (page - head);
1245
		pfn += skip - 1;
K
KAMEZAWA Hiroyuki 已提交
1246
	}
1247 1248 1249
	return -ENOENT;
found:
	*movable_pfn = pfn;
K
KAMEZAWA Hiroyuki 已提交
1250 1251 1252
	return 0;
}

1253
static struct page *new_node_page(struct page *page, unsigned long private)
1254 1255
{
	int nid = page_to_nid(page);
1256
	nodemask_t nmask = node_states[N_MEMORY];
1257 1258 1259 1260 1261 1262 1263 1264 1265

	/*
	 * 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)
	 */
	node_clear(nid, nmask);
	if (nodes_empty(nmask))
		node_set(nid, nmask);
1266

1267
	return new_page_nodemask(page, nid, &nmask);
1268 1269
}

K
KAMEZAWA Hiroyuki 已提交
1270 1271 1272 1273 1274 1275 1276 1277
static int
do_migrate_range(unsigned long start_pfn, unsigned long end_pfn)
{
	unsigned long pfn;
	struct page *page;
	int ret = 0;
	LIST_HEAD(source);

1278
	for (pfn = start_pfn; pfn < end_pfn; pfn++) {
K
KAMEZAWA Hiroyuki 已提交
1279 1280 1281
		if (!pfn_valid(pfn))
			continue;
		page = pfn_to_page(pfn);
1282 1283 1284

		if (PageHuge(page)) {
			struct page *head = compound_head(page);
1285
			pfn = page_to_pfn(head) + compound_nr(head) - 1;
1286
			isolate_huge_page(head, &source);
1287
			continue;
M
Michal Hocko 已提交
1288
		} else if (PageTransHuge(page))
1289 1290
			pfn = page_to_pfn(compound_head(page))
				+ hpage_nr_pages(page) - 1;
1291

1292 1293 1294 1295 1296 1297 1298 1299 1300 1301 1302 1303 1304 1305 1306
		/*
		 * 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;
		}

1307
		if (!get_page_unless_zero(page))
K
KAMEZAWA Hiroyuki 已提交
1308 1309
			continue;
		/*
1310 1311
		 * We can skip free pages. And we can deal with pages on
		 * LRU and non-lru movable pages.
K
KAMEZAWA Hiroyuki 已提交
1312
		 */
1313 1314 1315 1316
		if (PageLRU(page))
			ret = isolate_lru_page(page);
		else
			ret = isolate_movable_page(page, ISOLATE_UNEVICTABLE);
K
KAMEZAWA Hiroyuki 已提交
1317
		if (!ret) { /* Success */
1318
			list_add_tail(&page->lru, &source);
1319 1320
			if (!__PageMovable(page))
				inc_node_page_state(page, NR_ISOLATED_ANON +
H
Huang Ying 已提交
1321
						    page_is_file_lru(page));
1322

K
KAMEZAWA Hiroyuki 已提交
1323
		} else {
1324
			pr_warn("failed to isolate pfn %lx\n", pfn);
1325
			dump_page(page, "isolation failed");
K
KAMEZAWA Hiroyuki 已提交
1326
		}
1327
		put_page(page);
K
KAMEZAWA Hiroyuki 已提交
1328
	}
1329
	if (!list_empty(&source)) {
1330 1331
		/* Allocate a new page from the nearest neighbor node */
		ret = migrate_pages(&source, new_node_page, NULL, 0,
1332
					MIGRATE_SYNC, MR_MEMORY_HOTPLUG);
1333 1334 1335 1336 1337 1338
		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");
			}
1339
			putback_movable_pages(&source);
1340
		}
K
KAMEZAWA Hiroyuki 已提交
1341
	}
1342

K
KAMEZAWA Hiroyuki 已提交
1343 1344 1345
	return ret;
}

1346
/* Mark all sections offline and remove all free pages from the buddy. */
K
KAMEZAWA Hiroyuki 已提交
1347 1348 1349 1350
static int
offline_isolated_pages_cb(unsigned long start, unsigned long nr_pages,
			void *data)
{
1351
	unsigned long *offlined_pages = (unsigned long *)data;
K
KAMEZAWA Hiroyuki 已提交
1352

1353 1354
	*offlined_pages += __offline_isolated_pages(start, start + nr_pages);
	return 0;
K
KAMEZAWA Hiroyuki 已提交
1355 1356 1357
}

/*
1358
 * Check all pages in range, recorded as memory resource, are isolated.
K
KAMEZAWA Hiroyuki 已提交
1359 1360 1361 1362 1363
 */
static int
check_pages_isolated_cb(unsigned long start_pfn, unsigned long nr_pages,
			void *data)
{
1364 1365
	return test_pages_isolated(start_pfn, start_pfn + nr_pages,
				   MEMORY_OFFLINE);
K
KAMEZAWA Hiroyuki 已提交
1366 1367
}

1368 1369
static int __init cmdline_parse_movable_node(char *p)
{
1370
	movable_node_enabled = true;
1371 1372 1373 1374
	return 0;
}
early_param("movable_node", cmdline_parse_movable_node);

1375 1376 1377 1378 1379 1380
/* 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;
1381
	enum zone_type zt;
1382

1383 1384 1385
	arg->status_change_nid = NUMA_NO_NODE;
	arg->status_change_nid_normal = NUMA_NO_NODE;
	arg->status_change_nid_high = NUMA_NO_NODE;
1386 1387

	/*
1388 1389 1390 1391 1392 1393
	 * 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].
1394
	 */
1395
	for (zt = 0; zt <= ZONE_NORMAL; zt++)
1396
		present_pages += pgdat->node_zones[zt].present_pages;
1397
	if (zone_idx(zone) <= ZONE_NORMAL && nr_pages >= present_pages)
1398 1399
		arg->status_change_nid_normal = zone_to_nid(zone);

1400 1401
#ifdef CONFIG_HIGHMEM
	/*
1402 1403 1404 1405 1406 1407
	 * 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.
1408
	 */
1409 1410
	present_pages += pgdat->node_zones[ZONE_HIGHMEM].present_pages;
	if (zone_idx(zone) <= ZONE_HIGHMEM && nr_pages >= present_pages)
1411 1412 1413
		arg->status_change_nid_high = zone_to_nid(zone);
#endif

1414
	/*
1415 1416 1417 1418 1419 1420 1421 1422
	 * 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.
1423
	 */
1424
	present_pages += pgdat->node_zones[ZONE_MOVABLE].present_pages;
1425 1426 1427 1428 1429 1430 1431 1432 1433 1434

	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);

1435
	if (arg->status_change_nid_high >= 0)
1436
		node_clear_state(node, N_HIGH_MEMORY);
1437

1438
	if (arg->status_change_nid >= 0)
1439
		node_clear_state(node, N_MEMORY);
1440 1441
}

1442 1443 1444 1445 1446 1447 1448 1449 1450
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;
}

1451
static int __ref __offline_pages(unsigned long start_pfn,
1452
		  unsigned long end_pfn)
K
KAMEZAWA Hiroyuki 已提交
1453
{
1454
	unsigned long pfn, nr_pages = 0;
1455
	unsigned long offlined_pages = 0;
1456
	int ret, node, nr_isolate_pageblock;
1457
	unsigned long flags;
K
KAMEZAWA Hiroyuki 已提交
1458
	struct zone *zone;
1459
	struct memory_notify arg;
1460
	char *reason;
K
KAMEZAWA Hiroyuki 已提交
1461

1462 1463
	mem_hotplug_begin();

1464 1465 1466 1467 1468 1469 1470 1471 1472 1473 1474 1475 1476 1477 1478 1479
	/*
	 * 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.
	 */
	walk_system_ram_range(start_pfn, end_pfn - start_pfn, &nr_pages,
			      count_system_ram_pages_cb);
	if (nr_pages != end_pfn - start_pfn) {
		ret = -EINVAL;
		reason = "memory holes";
		goto failed_removal;
	}

K
KAMEZAWA Hiroyuki 已提交
1480 1481
	/* This makes hotplug much easier...and readable.
	   we assume this for now. .*/
1482 1483
	zone = test_pages_in_a_zone(start_pfn, end_pfn);
	if (!zone) {
1484 1485 1486
		ret = -EINVAL;
		reason = "multizone range";
		goto failed_removal;
1487
	}
1488 1489
	node = zone_to_nid(zone);

K
KAMEZAWA Hiroyuki 已提交
1490
	/* set above range as isolated */
1491
	ret = start_isolate_page_range(start_pfn, end_pfn,
1492
				       MIGRATE_MOVABLE,
1493
				       MEMORY_OFFLINE | REPORT_FAILURE);
1494
	if (ret < 0) {
1495 1496
		reason = "failure to isolate range";
		goto failed_removal;
1497
	}
1498
	nr_isolate_pageblock = ret;
1499 1500 1501

	arg.start_pfn = start_pfn;
	arg.nr_pages = nr_pages;
1502
	node_states_check_changes_offline(nr_pages, zone, &arg);
1503 1504 1505

	ret = memory_notify(MEM_GOING_OFFLINE, &arg);
	ret = notifier_to_errno(ret);
1506 1507 1508 1509
	if (ret) {
		reason = "notifier failure";
		goto failed_removal_isolated;
	}
1510

1511
	do {
1512 1513
		pfn = start_pfn;
		do {
1514 1515 1516 1517 1518
			if (signal_pending(current)) {
				ret = -EINTR;
				reason = "signal backoff";
				goto failed_removal_isolated;
			}
1519

1520 1521 1522
			cond_resched();
			lru_add_drain_all();

1523 1524
			ret = scan_movable_pages(pfn, end_pfn, &pfn);
			if (!ret) {
1525 1526 1527 1528 1529 1530
				/*
				 * TODO: fatal migration failures should bail
				 * out
				 */
				do_migrate_range(pfn, end_pfn);
			}
1531 1532 1533 1534 1535
		} while (!ret);

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

1538 1539 1540 1541 1542 1543 1544 1545 1546 1547 1548
		/*
		 * 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;
		}
		/* check again */
1549 1550 1551
		ret = walk_system_ram_range(start_pfn, end_pfn - start_pfn,
					    NULL, check_pages_isolated_cb);
	} while (ret);
1552

1553
	/* Ok, all of our target is isolated.
K
KAMEZAWA Hiroyuki 已提交
1554
	   We cannot do rollback at this point. */
1555 1556 1557
	walk_system_ram_range(start_pfn, end_pfn - start_pfn,
			      &offlined_pages, offline_isolated_pages_cb);
	pr_info("Offlined Pages %ld\n", offlined_pages);
1558 1559 1560 1561 1562 1563 1564 1565 1566
	/*
	 * 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);
	zone->nr_isolate_pageblock -= nr_isolate_pageblock;
	spin_unlock_irqrestore(&zone->lock, flags);

K
KAMEZAWA Hiroyuki 已提交
1567
	/* removal success */
1568
	adjust_managed_page_count(pfn_to_page(start_pfn), -offlined_pages);
K
KAMEZAWA Hiroyuki 已提交
1569
	zone->present_pages -= offlined_pages;
1570 1571

	pgdat_resize_lock(zone->zone_pgdat, &flags);
K
KAMEZAWA Hiroyuki 已提交
1572
	zone->zone_pgdat->node_present_pages -= offlined_pages;
1573
	pgdat_resize_unlock(zone->zone_pgdat, &flags);
1574

1575 1576
	init_per_zone_wmark_min();

1577
	if (!populated_zone(zone)) {
1578
		zone_pcp_reset(zone);
1579
		build_all_zonelists(NULL);
1580 1581
	} else
		zone_pcp_update(zone);
1582

1583
	node_states_clear_node(node, &arg);
1584
	if (arg.status_change_nid >= 0) {
1585
		kswapd_stop(node);
1586 1587
		kcompactd_stop(node);
	}
1588

K
KAMEZAWA Hiroyuki 已提交
1589 1590
	vm_total_pages = nr_free_pagecache_pages();
	writeback_set_ratelimit();
1591 1592

	memory_notify(MEM_OFFLINE, &arg);
1593
	remove_pfn_range_from_zone(zone, start_pfn, nr_pages);
1594
	mem_hotplug_done();
K
KAMEZAWA Hiroyuki 已提交
1595 1596
	return 0;

1597 1598
failed_removal_isolated:
	undo_isolate_page_range(start_pfn, end_pfn, MIGRATE_MOVABLE);
1599
	memory_notify(MEM_CANCEL_OFFLINE, &arg);
K
KAMEZAWA Hiroyuki 已提交
1600
failed_removal:
1601
	pr_debug("memory offlining [mem %#010llx-%#010llx] failed due to %s\n",
1602
		 (unsigned long long) start_pfn << PAGE_SHIFT,
1603 1604
		 ((unsigned long long) end_pfn << PAGE_SHIFT) - 1,
		 reason);
K
KAMEZAWA Hiroyuki 已提交
1605
	/* pushback to free area */
1606
	mem_hotplug_done();
K
KAMEZAWA Hiroyuki 已提交
1607 1608
	return ret;
}
1609

1610 1611
int offline_pages(unsigned long start_pfn, unsigned long nr_pages)
{
1612
	return __offline_pages(start_pfn, start_pfn + nr_pages);
1613 1614
}

1615
static int check_memblock_offlined_cb(struct memory_block *mem, void *arg)
1616 1617 1618
{
	int ret = !is_memblock_offlined(mem);

1619 1620 1621 1622
	if (unlikely(ret)) {
		phys_addr_t beginpa, endpa;

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

1627 1628 1629
		return -EBUSY;
	}
	return 0;
1630 1631
}

1632
static int check_cpu_on_node(pg_data_t *pgdat)
1633 1634 1635 1636 1637 1638 1639 1640 1641 1642 1643 1644 1645 1646 1647
{
	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;
}

1648 1649 1650 1651 1652 1653 1654 1655 1656 1657 1658 1659
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;
}

1660 1661
/**
 * try_offline_node
1662
 * @nid: the node ID
1663 1664 1665 1666 1667 1668
 *
 * 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.
 */
1669
void try_offline_node(int nid)
1670
{
1671
	pg_data_t *pgdat = NODE_DATA(nid);
1672
	int rc;
1673

1674 1675 1676 1677 1678 1679 1680
	/*
	 * 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;
1681

1682 1683 1684 1685 1686 1687 1688
	/*
	 * 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)
1689 1690
		return;

1691
	if (check_cpu_on_node(pgdat))
1692 1693 1694 1695 1696 1697 1698 1699 1700
		return;

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

1703 1704 1705 1706 1707 1708 1709 1710 1711 1712 1713 1714 1715 1716 1717 1718 1719 1720 1721 1722
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);
	}
}

1723
static int __ref try_remove_memory(int nid, u64 start, u64 size)
1724
{
1725
	int rc = 0;
1726

1727 1728
	BUG_ON(check_hotplug_memory_range(start, size));

1729
	/*
1730
	 * All memory blocks must be offlined before removing memory.  Check
1731
	 * whether all memory blocks in question are offline and return error
1732
	 * if this is not the case.
1733
	 */
1734
	rc = walk_memory_blocks(start, size, NULL, check_memblock_offlined_cb);
1735 1736
	if (rc)
		goto done;
1737

1738 1739
	/* remove memmap entry */
	firmware_map_remove(start, start + size, "System RAM");
1740

1741 1742 1743 1744
	/*
	 * Memory block device removal under the device_hotplug_lock is
	 * a barrier against racing online attempts.
	 */
1745
	remove_memory_block_devices(start, size);
1746

1747 1748
	mem_hotplug_begin();

1749
	arch_remove_memory(nid, start, size, NULL);
1750 1751 1752 1753 1754 1755

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

1756
	__release_memory_resource(start, size);
1757

1758 1759
	try_offline_node(nid);

1760
done:
1761
	mem_hotplug_done();
1762
	return rc;
1763
}
1764

1765 1766 1767 1768 1769 1770 1771 1772 1773 1774 1775 1776 1777 1778
/**
 * 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 已提交
1779
	 * trigger BUG() if some memory is not offlined prior to calling this
1780 1781 1782 1783 1784 1785 1786 1787 1788 1789 1790
	 * 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)
1791
{
1792 1793
	int rc;

1794
	lock_device_hotplug();
1795
	rc  = try_remove_memory(nid, start, size);
1796
	unlock_device_hotplug();
1797 1798

	return rc;
1799
}
1800
EXPORT_SYMBOL_GPL(remove_memory);
1801 1802 1803 1804 1805 1806 1807 1808 1809 1810 1811 1812 1813 1814 1815 1816 1817 1818 1819 1820 1821 1822 1823 1824 1825 1826 1827 1828 1829 1830 1831 1832 1833 1834 1835 1836 1837

/*
 * 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);
1838
#endif /* CONFIG_MEMORY_HOTREMOVE */