memory_hotplug.c 47.2 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
/*
 * 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.
 */

52
static void generic_online_page(struct page *page, unsigned int order);
53 54

static online_page_callback_t online_page_callback = generic_online_page;
55
static DEFINE_MUTEX(online_page_callback_lock);
56

57
DEFINE_STATIC_PERCPU_RWSEM(mem_hotplug_lock);
58

59 60 61 62
void get_online_mems(void)
{
	percpu_down_read(&mem_hotplug_lock);
}
63

64 65 66 67
void put_online_mems(void)
{
	percpu_up_read(&mem_hotplug_lock);
}
68

69 70
bool movable_node_enabled = false;

71
#ifndef CONFIG_MEMORY_HOTPLUG_DEFAULT_ONLINE
72
bool memhp_auto_online;
73 74 75
#else
bool memhp_auto_online = true;
#endif
76 77
EXPORT_SYMBOL_GPL(memhp_auto_online);

78 79 80 81 82 83 84 85 86 87 88
static int __init setup_memhp_default_state(char *str)
{
	if (!strcmp(str, "online"))
		memhp_auto_online = true;
	else if (!strcmp(str, "offline"))
		memhp_auto_online = false;

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

89
void mem_hotplug_begin(void)
90
{
91 92
	cpus_read_lock();
	percpu_down_write(&mem_hotplug_lock);
93 94
}

95
void mem_hotplug_done(void)
96
{
97 98
	percpu_up_write(&mem_hotplug_lock);
	cpus_read_unlock();
99
}
100

101 102
u64 max_mem_size = U64_MAX;

103 104 105
/* add this memory to iomem resource */
static struct resource *register_memory_resource(u64 start, u64 size)
{
106 107 108
	struct resource *res;
	unsigned long flags =  IORESOURCE_SYSTEM_RAM | IORESOURCE_BUSY;
	char *resource_name = "System RAM";
109 110 111 112

	if (start + size > max_mem_size)
		return ERR_PTR(-E2BIG);

113 114 115 116 117 118 119 120 121 122 123
	/*
	 * 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);
124
		return ERR_PTR(-EEXIST);
125 126 127 128 129 130 131 132 133 134 135 136
	}
	return res;
}

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

137
#ifdef CONFIG_MEMORY_HOTPLUG_SPARSE
138 139
void get_page_bootmem(unsigned long info,  struct page *page,
		      unsigned long type)
140
{
141
	page->freelist = (void *)type;
142 143
	SetPagePrivate(page);
	set_page_private(page, info);
144
	page_ref_inc(page);
145 146
}

147
void put_page_bootmem(struct page *page)
148
{
A
Andrea Arcangeli 已提交
149
	unsigned long type;
150

151
	type = (unsigned long) page->freelist;
A
Andrea Arcangeli 已提交
152 153
	BUG_ON(type < MEMORY_HOTPLUG_MIN_BOOTMEM_TYPE ||
	       type > MEMORY_HOTPLUG_MAX_BOOTMEM_TYPE);
154

155
	if (page_ref_dec_return(page) == 1) {
156
		page->freelist = NULL;
157 158
		ClearPagePrivate(page);
		set_page_private(page, 0);
A
Andrea Arcangeli 已提交
159
		INIT_LIST_HEAD(&page->lru);
160
		free_reserved_page(page);
161 162 163
	}
}

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

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

191 192
	usage = ms->usage;
	page = virt_to_page(usage);
193

194
	mapsize = PAGE_ALIGN(mem_section_usage_size()) >> PAGE_SHIFT;
195 196

	for (i = 0; i < mapsize; i++, page++)
197
		get_page_bootmem(section_nr, page, MIX_SECTION_INFO);
198 199

}
200 201 202
#else /* CONFIG_SPARSEMEM_VMEMMAP */
static void register_page_bootmem_info_section(unsigned long start_pfn)
{
203
	unsigned long mapsize, section_nr, i;
204 205
	struct mem_section *ms;
	struct page *page, *memmap;
206
	struct mem_section_usage *usage;
207 208 209 210 211 212 213 214

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

215 216
	usage = ms->usage;
	page = virt_to_page(usage);
217

218
	mapsize = PAGE_ALIGN(mem_section_usage_size()) >> PAGE_SHIFT;
219 220 221 222 223

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

225
void __init register_page_bootmem_info_node(struct pglist_data *pgdat)
226 227 228 229 230 231 232 233 234 235 236 237
{
	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;
238
	end_pfn = pgdat_end_pfn(pgdat);
239

240
	/* register section info */
241 242 243 244 245
	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
246
		 * reside in some other nodes.
247
		 */
248
		if (pfn_valid(pfn) && (early_pfn_to_nid(pfn) == node))
249 250
			register_page_bootmem_info_section(pfn);
	}
251
}
252
#endif /* CONFIG_HAVE_BOOTMEM_INFO_NODE */
253

254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280
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;
}

281 282 283 284 285 286
/*
 * 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.
 */
287 288
int __ref __add_pages(int nid, unsigned long pfn, unsigned long nr_pages,
		struct mhp_restrictions *restrictions)
289
{
290 291
	int err;
	unsigned long nr, start_sec, end_sec;
292
	struct vmem_altmap *altmap = restrictions->altmap;
293 294 295 296 297

	if (altmap) {
		/*
		 * Validate altmap is within bounds of the total request
		 */
298
		if (altmap->base_pfn != pfn
299 300
				|| vmem_altmap_offset(altmap) > nr_pages) {
			pr_warn_once("memory add fail, invalid altmap\n");
301
			return -EINVAL;
302 303 304 305
		}
		altmap->alloc = 0;
	}

306 307 308 309 310 311
	err = check_pfn_span(pfn, nr_pages, "add");
	if (err)
		return err;

	start_sec = pfn_to_section_nr(pfn);
	end_sec = pfn_to_section_nr(pfn + nr_pages - 1);
312
	for (nr = start_sec; nr <= end_sec; nr++) {
313 314 315 316
		unsigned long pfns;

		pfns = min(nr_pages, PAGES_PER_SECTION
				- (pfn & ~PAGE_SECTION_MASK));
317 318 319
		err = sparse_add_section(nid, pfn, pfns, altmap);
		if (err)
			break;
320 321
		pfn += pfns;
		nr_pages -= pfns;
322
		cond_resched();
323
	}
324
	vmemmap_populate_print_last();
325 326 327
	return err;
}

328
/* find the smallest valid pfn in the range [start_pfn, end_pfn) */
329
static unsigned long find_smallest_section_pfn(int nid, struct zone *zone,
330 331 332
				     unsigned long start_pfn,
				     unsigned long end_pfn)
{
333
	for (; start_pfn < end_pfn; start_pfn += PAGES_PER_SUBSECTION) {
334
		if (unlikely(!pfn_to_online_page(start_pfn)))
335 336 337 338 339 340 341 342 343 344 345 346 347 348 349
			continue;

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

		if (zone && zone != page_zone(pfn_to_page(start_pfn)))
			continue;

		return start_pfn;
	}

	return 0;
}

/* find the biggest valid pfn in the range [start_pfn, end_pfn). */
350
static unsigned long find_biggest_section_pfn(int nid, struct zone *zone,
351 352 353 354 355 356 357
				    unsigned long start_pfn,
				    unsigned long end_pfn)
{
	unsigned long pfn;

	/* pfn is the end pfn of a memory section. */
	pfn = end_pfn - 1;
358
	for (; pfn >= start_pfn; pfn -= PAGES_PER_SUBSECTION) {
359
		if (unlikely(!pfn_to_online_page(pfn)))
360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 376
			continue;

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

		if (zone && zone != page_zone(pfn_to_page(pfn)))
			continue;

		return pfn;
	}

	return 0;
}

static void shrink_zone_span(struct zone *zone, unsigned long start_pfn,
			     unsigned long end_pfn)
{
377 378 379
	unsigned long zone_start_pfn = zone->zone_start_pfn;
	unsigned long z = zone_end_pfn(zone); /* zone_end_pfn namespace clash */
	unsigned long zone_end_pfn = z;
380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416
	unsigned long pfn;
	int nid = zone_to_nid(zone);

	zone_span_writelock(zone);
	if (zone_start_pfn == start_pfn) {
		/*
		 * 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,
						zone_end_pfn);
		if (pfn) {
			zone->zone_start_pfn = pfn;
			zone->spanned_pages = zone_end_pfn - pfn;
		}
	} else if (zone_end_pfn == end_pfn) {
		/*
		 * 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.
		 */
		pfn = find_biggest_section_pfn(nid, zone, zone_start_pfn,
					       start_pfn);
		if (pfn)
			zone->spanned_pages = pfn - zone_start_pfn + 1;
	}

	/*
	 * The section is not biggest or smallest mem_section in the zone, it
	 * only creates a hole in the zone. So in this case, we need not
	 * change the zone. But perhaps, the zone has only hole data. Thus
	 * it check the zone has only hole or not.
	 */
	pfn = zone_start_pfn;
417
	for (; pfn < zone_end_pfn; pfn += PAGES_PER_SUBSECTION) {
418
		if (unlikely(!pfn_to_online_page(pfn)))
419 420 421 422 423
			continue;

		if (page_zone(pfn_to_page(pfn)) != zone)
			continue;

424 425
		/* Skip range to be removed */
		if (pfn >= start_pfn && pfn < end_pfn)
426 427 428 429 430 431 432 433 434 435 436 437 438
			continue;

		/* If we find valid section, we have nothing to do */
		zone_span_writeunlock(zone);
		return;
	}

	/* The zone has no valid section */
	zone->zone_start_pfn = 0;
	zone->spanned_pages = 0;
	zone_span_writeunlock(zone);
}

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

458 459 460 461
		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;
462 463
	}

464 465
	pgdat->node_start_pfn = node_start_pfn;
	pgdat->node_spanned_pages = node_end_pfn - node_start_pfn;
466 467
}

468 469
static void __remove_zone(struct zone *zone, unsigned long start_pfn,
		unsigned long nr_pages)
470 471 472 473
{
	struct pglist_data *pgdat = zone->zone_pgdat;
	unsigned long flags;

474 475 476 477 478 479 480 481 482 483
#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

484 485
	pgdat_resize_lock(zone->zone_pgdat, &flags);
	shrink_zone_span(zone, start_pfn, start_pfn + nr_pages);
486
	update_pgdat_span(pgdat);
487 488 489
	pgdat_resize_unlock(zone->zone_pgdat, &flags);
}

490 491 492
static void __remove_section(struct zone *zone, unsigned long pfn,
		unsigned long nr_pages, unsigned long map_offset,
		struct vmem_altmap *altmap)
493
{
494
	struct mem_section *ms = __nr_to_section(pfn_to_section_nr(pfn));
495

496 497
	if (WARN_ON_ONCE(!valid_section(ms)))
		return;
498

499
	__remove_zone(zone, pfn, nr_pages);
500
	sparse_remove_section(ms, pfn, nr_pages, map_offset, altmap);
501 502 503 504 505
}

/**
 * __remove_pages() - remove sections of pages from a zone
 * @zone: zone from which pages need to be removed
506
 * @pfn: starting pageframe (must be aligned to start of a section)
507
 * @nr_pages: number of pages to remove (must be multiple of section size)
508
 * @altmap: alternative device page map or %NULL if default memmap is used
509 510 511 512 513 514
 *
 * 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().
 */
515
void __remove_pages(struct zone *zone, unsigned long pfn,
516
		    unsigned long nr_pages, struct vmem_altmap *altmap)
517
{
518
	unsigned long map_offset = 0;
519
	unsigned long nr, start_sec, end_sec;
520

521
	map_offset = vmem_altmap_offset(altmap);
522

523 524
	clear_zone_contiguous(zone);

525 526
	if (check_pfn_span(pfn, nr_pages, "remove"))
		return;
527

528 529
	start_sec = pfn_to_section_nr(pfn);
	end_sec = pfn_to_section_nr(pfn + nr_pages - 1);
530
	for (nr = start_sec; nr <= end_sec; nr++) {
531
		unsigned long pfns;
532

533
		cond_resched();
534 535 536 537 538
		pfns = min(nr_pages, PAGES_PER_SECTION
				- (pfn & ~PAGE_SECTION_MASK));
		__remove_section(zone, pfn, pfns, map_offset, altmap);
		pfn += pfns;
		nr_pages -= pfns;
539
		map_offset = 0;
540
	}
541 542

	set_zone_contiguous(zone);
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 583

	return rc;
}
EXPORT_SYMBOL_GPL(restore_online_page_callback);

void __online_page_set_limits(struct page *page)
584
{
585 586 587 588 589
}
EXPORT_SYMBOL_GPL(__online_page_set_limits);

void __online_page_increment_counters(struct page *page)
{
590
	adjust_managed_page_count(page, 1);
591 592
}
EXPORT_SYMBOL_GPL(__online_page_increment_counters);
593

594 595
void __online_page_free(struct page *page)
{
596
	__free_reserved_page(page);
597
}
598 599
EXPORT_SYMBOL_GPL(__online_page_free);

600
static void generic_online_page(struct page *page, unsigned int order)
601
{
602
	kernel_map_pages(page, 1 << order, 1);
603 604 605 606 607 608 609 610
	__free_pages_core(page, order);
	totalram_pages_add(1UL << order);
#ifdef CONFIG_HIGHMEM
	if (PageHighMem(page))
		totalhigh_pages_add(1UL << order);
#endif
}

611 612
static int online_pages_range(unsigned long start_pfn, unsigned long nr_pages,
			void *arg)
613
{
614 615 616 617 618 619 620 621 622 623 624
	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)));
625 626 627
		/* __free_pages_core() wants pfns to be aligned to the order */
		if (WARN_ON_ONCE(!IS_ALIGNED(pfn, 1ul << order)))
			order = 0;
628 629
		(*online_page_callback)(pfn_to_page(pfn), order);
	}
630

631 632
	/* mark all involved sections as online */
	online_mem_sections(start_pfn, end_pfn);
633

634
	*(unsigned long *)arg += nr_pages;
635 636 637
	return 0;
}

638 639 640 641 642 643
/* 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);

644 645 646
	arg->status_change_nid = NUMA_NO_NODE;
	arg->status_change_nid_normal = NUMA_NO_NODE;
	arg->status_change_nid_high = NUMA_NO_NODE;
647

648 649 650
	if (!node_state(nid, N_MEMORY))
		arg->status_change_nid = nid;
	if (zone_idx(zone) <= ZONE_NORMAL && !node_state(nid, N_NORMAL_MEMORY))
651
		arg->status_change_nid_normal = nid;
652
#ifdef CONFIG_HIGHMEM
653
	if (zone_idx(zone) <= ZONE_HIGHMEM && !node_state(nid, N_HIGH_MEMORY))
654 655
		arg->status_change_nid_high = nid;
#endif
656 657 658 659 660 661 662
}

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

663 664 665
	if (arg->status_change_nid_high >= 0)
		node_set_state(node, N_HIGH_MEMORY);

666 667
	if (arg->status_change_nid >= 0)
		node_set_state(node, N_MEMORY);
668 669
}

670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690
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;

691 692 693 694 695 696
}
/*
 * 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.
 */
697 698
void __ref move_pfn_range_to_zone(struct zone *zone, unsigned long start_pfn,
		unsigned long nr_pages, struct vmem_altmap *altmap)
699 700 701 702
{
	struct pglist_data *pgdat = zone->zone_pgdat;
	int nid = pgdat->node_id;
	unsigned long flags;
703

704 705 706 707 708
	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);
709 710
	if (zone_is_empty(zone))
		init_currently_empty_zone(zone, start_pfn, nr_pages);
711 712 713 714 715 716 717 718 719 720 721
	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
	 */
722 723
	memmap_init_zone(nr_pages, nid, zone_idx(zone), start_pfn,
			MEMMAP_HOTPLUG, altmap);
724 725 726 727

	set_zone_contiguous(zone);
}

728 729 730 731 732
/*
 * 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.
 */
733
static struct zone *default_kernel_zone_for_pfn(int nid, unsigned long start_pfn,
734 735 736 737 738 739 740 741 742 743 744 745 746 747 748
		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];
}

749 750
static inline struct zone *default_zone_for_pfn(int nid, unsigned long start_pfn,
		unsigned long nr_pages)
751
{
752 753 754 755 756
	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);
757 758

	/*
759 760
	 * We inherit the existing zone in a simple case where zones do not
	 * overlap in the given range
761
	 */
762 763
	if (in_kernel ^ in_movable)
		return (in_kernel) ? kernel_zone : movable_zone;
764

765 766 767 768 769 770
	/*
	 * 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;
771 772
}

773 774
struct zone * zone_for_pfn_range(int online_type, int nid, unsigned start_pfn,
		unsigned long nr_pages)
775
{
776 777
	if (online_type == MMOP_ONLINE_KERNEL)
		return default_kernel_zone_for_pfn(nid, start_pfn, nr_pages);
778

779 780
	if (online_type == MMOP_ONLINE_MOVABLE)
		return &NODE_DATA(nid)->node_zones[ZONE_MOVABLE];
781

782
	return default_zone_for_pfn(nid, start_pfn, nr_pages);
783 784
}

785
int __ref online_pages(unsigned long pfn, unsigned long nr_pages, int online_type)
786
{
787
	unsigned long flags;
788 789
	unsigned long onlined_pages = 0;
	struct zone *zone;
790
	int need_zonelists_rebuild = 0;
791 792 793
	int nid;
	int ret;
	struct memory_notify arg;
794 795
	struct memory_block *mem;

796 797
	mem_hotplug_begin();

798 799 800 801 802 803
	/*
	 * We can't use pfn_to_nid() because nid might be stored in struct page
	 * which is not yet initialized. Instead, we find nid from memory block.
	 */
	mem = find_memory_block(__pfn_to_section(pfn));
	nid = mem->nid;
804
	put_device(&mem->dev);
805

806
	/* associate pfn range with the zone */
807 808
	zone = zone_for_pfn_range(online_type, nid, pfn, nr_pages);
	move_pfn_range_to_zone(zone, pfn, nr_pages, NULL);
809

810 811
	arg.start_pfn = pfn;
	arg.nr_pages = nr_pages;
812
	node_states_check_changes_online(nr_pages, zone, &arg);
813 814 815

	ret = memory_notify(MEM_GOING_ONLINE, &arg);
	ret = notifier_to_errno(ret);
816 817 818
	if (ret)
		goto failed_addition;

819 820 821 822 823
	/*
	 * 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.
	 */
824
	if (!populated_zone(zone)) {
825
		need_zonelists_rebuild = 1;
826
		setup_zone_pageset(zone);
827
	}
828

K
KAMEZAWA Hiroyuki 已提交
829
	ret = walk_system_ram_range(pfn, nr_pages, &onlined_pages,
830
		online_pages_range);
831
	if (ret) {
832
		/* not a single memory resource was applicable */
833 834
		if (need_zonelists_rebuild)
			zone_pcp_reset(zone);
835
		goto failed_addition;
836 837
	}

838
	zone->present_pages += onlined_pages;
839 840

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

844 845
	shuffle_zone(zone);

846 847 848 849 850
	node_states_set_node(nid, &arg);
	if (need_zonelists_rebuild)
		build_all_zonelists(NULL);
	else
		zone_pcp_update(zone);
851

852 853
	init_per_zone_wmark_min();

854 855
	kswapd_run(nid);
	kcompactd_run(nid);
856

857
	vm_total_pages = nr_free_pagecache_pages();
858

859
	writeback_set_ratelimit();
860

861
	memory_notify(MEM_ONLINE, &arg);
862
	mem_hotplug_done();
863
	return 0;
864 865 866 867 868 869

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);
870
	mem_hotplug_done();
871
	return ret;
872
}
873
#endif /* CONFIG_MEMORY_HOTPLUG_SPARSE */
874

875 876 877 878 879 880 881 882 883 884
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;
}

885 886
/* we are OK calling __meminit stuff here - we have CONFIG_MEMORY_HOTPLUG */
static pg_data_t __ref *hotadd_new_pgdat(int nid, u64 start)
887 888
{
	struct pglist_data *pgdat;
889
	unsigned long start_pfn = PFN_DOWN(start);
890

891 892 893 894 895
	pgdat = NODE_DATA(nid);
	if (!pgdat) {
		pgdat = arch_alloc_nodedata(nid);
		if (!pgdat)
			return NULL;
896

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

			p = per_cpu_ptr(pgdat->per_cpu_nodestats, cpu);
			memset(p, 0, sizeof(*p));
		}
916
	}
917 918 919

	/* we can use NODE_DATA(nid) from here */

920 921 922
	pgdat->node_id = nid;
	pgdat->node_start_pfn = start_pfn;

923
	/* init node's zones as empty zones, we don't have any present pages.*/
924
	free_area_init_core_hotplug(nid);
925

926 927 928 929
	/*
	 * The node we allocated has no zone fallback lists. For avoiding
	 * to access not-initialized zonelist, build here.
	 */
930
	build_all_zonelists(pgdat);
931

932 933 934 935 936
	/*
	 * 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().
	 */
937
	reset_node_managed_pages(pgdat);
938 939
	reset_node_present_pages(pgdat);

940 941 942
	return pgdat;
}

943
static void rollback_node_hotadd(int nid)
944
{
945 946
	pg_data_t *pgdat = NODE_DATA(nid);

947
	arch_refresh_nodedata(nid, NULL);
948
	free_percpu(pgdat->per_cpu_nodestats);
949 950 951
	arch_free_nodedata(pgdat);
}

952

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

970 971 972
	if (node_online(nid))
		return 0;

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

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

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

	mem_hotplug_begin();
	ret =  __try_online_node(nid, 0, true);
998
	mem_hotplug_done();
999 1000 1001
	return ret;
}

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

	return 0;
}

1015 1016
static int online_memory_block(struct memory_block *mem, void *arg)
{
1017
	return device_online(&mem->dev);
1018 1019
}

1020 1021 1022 1023 1024 1025
/*
 * 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
 */
1026
int __ref add_memory_resource(int nid, struct resource *res)
1027
{
1028
	struct mhp_restrictions restrictions = {};
1029
	u64 start, size;
1030
	bool new_node = false;
1031 1032
	int ret;

1033 1034 1035
	start = res->start;
	size = resource_size(res);

1036 1037 1038 1039
	ret = check_hotplug_memory_range(start, size);
	if (ret)
		return ret;

1040
	mem_hotplug_begin();
1041

1042 1043 1044 1045 1046 1047 1048 1049
	/*
	 * Add new range to memblock so that when hotadd_new_pgdat() is called
	 * to allocate new pgdat, get_pfn_range_for_nid() will be able to find
	 * this new range and calculate total pages correctly.  The range will
	 * be removed at hot-remove time.
	 */
	memblock_add_node(start, size, nid);

1050 1051 1052 1053
	ret = __try_online_node(nid, start, false);
	if (ret < 0)
		goto error;
	new_node = ret;
1054

1055
	/* call arch's memory hotadd */
1056
	ret = arch_add_memory(nid, start, size, &restrictions);
1057 1058 1059
	if (ret < 0)
		goto error;

1060 1061 1062 1063 1064 1065 1066
	/* 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;
	}

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

1078
	/* link memory sections under this node.*/
1079
	ret = link_mem_sections(nid, PFN_DOWN(start), PFN_UP(start + size - 1));
1080 1081
	BUG_ON(ret);

1082 1083 1084
	/* create new memmap entry */
	firmware_map_add_hotplug(start, start + size, "System RAM");

1085 1086 1087
	/* device_online() will take the lock when calling online_pages() */
	mem_hotplug_done();

1088
	/* online pages if requested */
1089
	if (memhp_auto_online)
1090
		walk_memory_blocks(start, size, NULL, online_memory_block);
1091

1092
	return ret;
1093 1094
error:
	/* rollback pgdat allocation and others */
1095 1096
	if (new_node)
		rollback_node_hotadd(nid);
1097
	memblock_remove(start, size);
1098
	mem_hotplug_done();
1099 1100
	return ret;
}
1101

1102 1103
/* requires device_hotplug_lock, see add_memory_resource() */
int __ref __add_memory(int nid, u64 start, u64 size)
1104 1105 1106 1107 1108
{
	struct resource *res;
	int ret;

	res = register_memory_resource(start, size);
1109 1110
	if (IS_ERR(res))
		return PTR_ERR(res);
1111

1112
	ret = add_memory_resource(nid, res);
1113 1114 1115 1116
	if (ret < 0)
		release_memory_resource(res);
	return ret;
}
1117 1118 1119 1120 1121 1122 1123 1124 1125 1126 1127

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

#ifdef CONFIG_MEMORY_HOTREMOVE
1131 1132 1133 1134 1135 1136 1137 1138 1139 1140 1141 1142
/*
 * A free page on the buddy free lists (not the per-cpu lists) has PageBuddy
 * set and the size of the free page is given by page_order(). Using this,
 * the function determines if the pageblock contains only free pages.
 * Due to buddy contraints, a free page at least the size of a pageblock will
 * be located at the start of the pageblock
 */
static inline int pageblock_free(struct page *page)
{
	return PageBuddy(page) && page_order(page) >= pageblock_order;
}

1143 1144
/* Return the pfn of the start of the next active pageblock after a given pfn */
static unsigned long next_active_pageblock(unsigned long pfn)
1145
{
1146 1147
	struct page *page = pfn_to_page(pfn);

1148
	/* Ensure the starting page is pageblock-aligned */
1149
	BUG_ON(pfn & (pageblock_nr_pages - 1));
1150 1151

	/* If the entire pageblock is free, move to the end of free page */
1152 1153 1154 1155 1156
	if (pageblock_free(page)) {
		int order;
		/* be careful. we don't have locks, page_order can be changed.*/
		order = page_order(page);
		if ((order < MAX_ORDER) && (order >= pageblock_order))
1157
			return pfn + (1 << order);
1158
	}
1159

1160
	return pfn + pageblock_nr_pages;
1161 1162
}

1163
static bool is_pageblock_removable_nolock(unsigned long pfn)
1164
{
1165
	struct page *page = pfn_to_page(pfn);
1166 1167 1168 1169 1170 1171 1172 1173 1174 1175 1176 1177 1178 1179 1180 1181 1182
	struct zone *zone;

	/*
	 * We have to be careful here because we are iterating over memory
	 * sections which are not zone aware so we might end up outside of
	 * the zone but still within the section.
	 * We have to take care about the node as well. If the node is offline
	 * its NODE_DATA will be NULL - see page_zone.
	 */
	if (!node_online(page_to_nid(page)))
		return false;

	zone = page_zone(page);
	pfn = page_to_pfn(page);
	if (!zone_spans_pfn(zone, pfn))
		return false;

1183
	return !has_unmovable_pages(zone, page, 0, MIGRATE_MOVABLE, SKIP_HWPOISON);
1184 1185
}

1186
/* Checks if this range of memory is likely to be hot-removable. */
1187
bool is_mem_section_removable(unsigned long start_pfn, unsigned long nr_pages)
1188
{
1189 1190 1191 1192
	unsigned long end_pfn, pfn;

	end_pfn = min(start_pfn + nr_pages,
			zone_end_pfn(page_zone(pfn_to_page(start_pfn))));
1193 1194

	/* Check the starting page of each pageblock within the range */
1195 1196
	for (pfn = start_pfn; pfn < end_pfn; pfn = next_active_pageblock(pfn)) {
		if (!is_pageblock_removable_nolock(pfn))
1197
			return false;
1198
		cond_resched();
1199 1200 1201
	}

	/* All pageblocks in the memory block are likely to be hot-removable */
1202
	return true;
1203 1204
}

K
KAMEZAWA Hiroyuki 已提交
1205
/*
1206
 * Confirm all pages in a range [start, end) belong to the same zone.
1207
 * When true, return its valid [start, end).
K
KAMEZAWA Hiroyuki 已提交
1208
 */
1209 1210
int test_pages_in_a_zone(unsigned long start_pfn, unsigned long end_pfn,
			 unsigned long *valid_start, unsigned long *valid_end)
K
KAMEZAWA Hiroyuki 已提交
1211
{
1212
	unsigned long pfn, sec_end_pfn;
1213
	unsigned long start, end;
K
KAMEZAWA Hiroyuki 已提交
1214 1215 1216
	struct zone *zone = NULL;
	struct page *page;
	int i;
1217
	for (pfn = start_pfn, sec_end_pfn = SECTION_ALIGN_UP(start_pfn + 1);
K
KAMEZAWA Hiroyuki 已提交
1218
	     pfn < end_pfn;
1219
	     pfn = sec_end_pfn, sec_end_pfn += PAGES_PER_SECTION) {
1220 1221
		/* Make sure the memory section is present first */
		if (!present_section_nr(pfn_to_section_nr(pfn)))
K
KAMEZAWA Hiroyuki 已提交
1222
			continue;
1223 1224 1225 1226 1227 1228 1229
		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++;
1230
			if (i == MAX_ORDER_NR_PAGES || pfn + i >= end_pfn)
1231
				continue;
1232 1233 1234
			/* Check if we got outside of the zone */
			if (zone && !zone_spans_pfn(zone, pfn + i))
				return 0;
1235 1236 1237
			page = pfn_to_page(pfn + i);
			if (zone && page_zone(page) != zone)
				return 0;
1238 1239
			if (!zone)
				start = pfn + i;
1240
			zone = page_zone(page);
1241
			end = pfn + MAX_ORDER_NR_PAGES;
1242
		}
K
KAMEZAWA Hiroyuki 已提交
1243
	}
1244

1245 1246
	if (zone) {
		*valid_start = start;
1247
		*valid_end = min(end, end_pfn);
1248
		return 1;
1249
	} else {
1250
		return 0;
1251
	}
K
KAMEZAWA Hiroyuki 已提交
1252 1253 1254
}

/*
1255 1256 1257 1258
 * Scan pfn range [start,end) to find movable/migratable pages (LRU pages,
 * non-lru movable pages and hugepages). We scan pfn because it's much
 * easier than scanning over linked list. This function returns the pfn
 * of the first found movable page if it's found, otherwise 0.
K
KAMEZAWA Hiroyuki 已提交
1259
 */
1260
static unsigned long scan_movable_pages(unsigned long start, unsigned long end)
K
KAMEZAWA Hiroyuki 已提交
1261 1262
{
	unsigned long pfn;
1263

K
KAMEZAWA Hiroyuki 已提交
1264
	for (pfn = start; pfn < end; pfn++) {
1265 1266 1267 1268 1269 1270 1271 1272 1273 1274 1275 1276 1277 1278
		struct page *page, *head;
		unsigned long skip;

		if (!pfn_valid(pfn))
			continue;
		page = pfn_to_page(pfn);
		if (PageLRU(page))
			return pfn;
		if (__PageMovable(page))
			return pfn;

		if (!PageHuge(page))
			continue;
		head = compound_head(page);
1279
		if (page_huge_active(head))
1280
			return pfn;
1281
		skip = compound_nr(head) - (page - head);
1282
		pfn += skip - 1;
K
KAMEZAWA Hiroyuki 已提交
1283 1284 1285 1286
	}
	return 0;
}

1287
static struct page *new_node_page(struct page *page, unsigned long private)
1288 1289
{
	int nid = page_to_nid(page);
1290
	nodemask_t nmask = node_states[N_MEMORY];
1291 1292 1293 1294 1295 1296 1297 1298 1299

	/*
	 * 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);
1300

1301
	return new_page_nodemask(page, nid, &nmask);
1302 1303
}

K
KAMEZAWA Hiroyuki 已提交
1304 1305 1306 1307 1308 1309 1310 1311
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);

1312
	for (pfn = start_pfn; pfn < end_pfn; pfn++) {
K
KAMEZAWA Hiroyuki 已提交
1313 1314 1315
		if (!pfn_valid(pfn))
			continue;
		page = pfn_to_page(pfn);
1316 1317 1318

		if (PageHuge(page)) {
			struct page *head = compound_head(page);
1319
			pfn = page_to_pfn(head) + compound_nr(head) - 1;
1320
			isolate_huge_page(head, &source);
1321
			continue;
M
Michal Hocko 已提交
1322
		} else if (PageTransHuge(page))
1323 1324
			pfn = page_to_pfn(compound_head(page))
				+ hpage_nr_pages(page) - 1;
1325

1326 1327 1328 1329 1330 1331 1332 1333 1334 1335 1336 1337 1338 1339 1340
		/*
		 * 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;
		}

1341
		if (!get_page_unless_zero(page))
K
KAMEZAWA Hiroyuki 已提交
1342 1343
			continue;
		/*
1344 1345
		 * We can skip free pages. And we can deal with pages on
		 * LRU and non-lru movable pages.
K
KAMEZAWA Hiroyuki 已提交
1346
		 */
1347 1348 1349 1350
		if (PageLRU(page))
			ret = isolate_lru_page(page);
		else
			ret = isolate_movable_page(page, ISOLATE_UNEVICTABLE);
K
KAMEZAWA Hiroyuki 已提交
1351
		if (!ret) { /* Success */
1352
			list_add_tail(&page->lru, &source);
1353 1354 1355
			if (!__PageMovable(page))
				inc_node_page_state(page, NR_ISOLATED_ANON +
						    page_is_file_cache(page));
1356

K
KAMEZAWA Hiroyuki 已提交
1357
		} else {
1358
			pr_warn("failed to isolate pfn %lx\n", pfn);
1359
			dump_page(page, "isolation failed");
K
KAMEZAWA Hiroyuki 已提交
1360
		}
1361
		put_page(page);
K
KAMEZAWA Hiroyuki 已提交
1362
	}
1363
	if (!list_empty(&source)) {
1364 1365
		/* Allocate a new page from the nearest neighbor node */
		ret = migrate_pages(&source, new_node_page, NULL, 0,
1366
					MIGRATE_SYNC, MR_MEMORY_HOTPLUG);
1367 1368 1369 1370 1371 1372
		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");
			}
1373
			putback_movable_pages(&source);
1374
		}
K
KAMEZAWA Hiroyuki 已提交
1375
	}
1376

K
KAMEZAWA Hiroyuki 已提交
1377 1378 1379 1380 1381 1382 1383 1384 1385 1386
	return ret;
}

/*
 * remove from free_area[] and mark all as Reserved.
 */
static int
offline_isolated_pages_cb(unsigned long start, unsigned long nr_pages,
			void *data)
{
1387
	unsigned long *offlined_pages = (unsigned long *)data;
K
KAMEZAWA Hiroyuki 已提交
1388

1389 1390
	*offlined_pages += __offline_isolated_pages(start, start + nr_pages);
	return 0;
K
KAMEZAWA Hiroyuki 已提交
1391 1392 1393 1394 1395 1396 1397 1398 1399
}

/*
 * Check all pages in range, recoreded as memory resource, are isolated.
 */
static int
check_pages_isolated_cb(unsigned long start_pfn, unsigned long nr_pages,
			void *data)
{
1400
	return test_pages_isolated(start_pfn, start_pfn + nr_pages, true);
K
KAMEZAWA Hiroyuki 已提交
1401 1402
}

1403 1404
static int __init cmdline_parse_movable_node(char *p)
{
1405
#ifdef CONFIG_HAVE_MEMBLOCK_NODE_MAP
1406
	movable_node_enabled = true;
1407 1408 1409
#else
	pr_warn("movable_node parameter depends on CONFIG_HAVE_MEMBLOCK_NODE_MAP to work properly\n");
#endif
1410 1411 1412 1413
	return 0;
}
early_param("movable_node", cmdline_parse_movable_node);

1414 1415 1416 1417 1418 1419
/* 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;
1420
	enum zone_type zt;
1421

1422 1423 1424
	arg->status_change_nid = NUMA_NO_NODE;
	arg->status_change_nid_normal = NUMA_NO_NODE;
	arg->status_change_nid_high = NUMA_NO_NODE;
1425 1426

	/*
1427 1428 1429 1430 1431 1432
	 * 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].
1433
	 */
1434
	for (zt = 0; zt <= ZONE_NORMAL; zt++)
1435
		present_pages += pgdat->node_zones[zt].present_pages;
1436
	if (zone_idx(zone) <= ZONE_NORMAL && nr_pages >= present_pages)
1437 1438
		arg->status_change_nid_normal = zone_to_nid(zone);

1439 1440
#ifdef CONFIG_HIGHMEM
	/*
1441 1442 1443 1444 1445 1446
	 * 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.
1447
	 */
1448 1449
	present_pages += pgdat->node_zones[ZONE_HIGHMEM].present_pages;
	if (zone_idx(zone) <= ZONE_HIGHMEM && nr_pages >= present_pages)
1450 1451 1452
		arg->status_change_nid_high = zone_to_nid(zone);
#endif

1453
	/*
1454 1455 1456 1457 1458 1459 1460 1461
	 * 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.
1462
	 */
1463
	present_pages += pgdat->node_zones[ZONE_MOVABLE].present_pages;
1464 1465 1466 1467 1468 1469 1470 1471 1472 1473

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

1474
	if (arg->status_change_nid_high >= 0)
1475
		node_clear_state(node, N_HIGH_MEMORY);
1476

1477
	if (arg->status_change_nid >= 0)
1478
		node_clear_state(node, N_MEMORY);
1479 1480
}

1481
static int __ref __offline_pages(unsigned long start_pfn,
1482
		  unsigned long end_pfn)
K
KAMEZAWA Hiroyuki 已提交
1483
{
1484
	unsigned long pfn, nr_pages;
1485
	unsigned long offlined_pages = 0;
1486
	int ret, node, nr_isolate_pageblock;
1487
	unsigned long flags;
1488
	unsigned long valid_start, valid_end;
K
KAMEZAWA Hiroyuki 已提交
1489
	struct zone *zone;
1490
	struct memory_notify arg;
1491
	char *reason;
K
KAMEZAWA Hiroyuki 已提交
1492

1493 1494
	mem_hotplug_begin();

K
KAMEZAWA Hiroyuki 已提交
1495 1496
	/* This makes hotplug much easier...and readable.
	   we assume this for now. .*/
1497 1498
	if (!test_pages_in_a_zone(start_pfn, end_pfn, &valid_start,
				  &valid_end)) {
1499 1500 1501
		ret = -EINVAL;
		reason = "multizone range";
		goto failed_removal;
1502
	}
1503

1504
	zone = page_zone(pfn_to_page(valid_start));
1505 1506 1507
	node = zone_to_nid(zone);
	nr_pages = end_pfn - start_pfn;

K
KAMEZAWA Hiroyuki 已提交
1508
	/* set above range as isolated */
1509
	ret = start_isolate_page_range(start_pfn, end_pfn,
1510 1511
				       MIGRATE_MOVABLE,
				       SKIP_HWPOISON | REPORT_FAILURE);
1512
	if (ret < 0) {
1513 1514
		reason = "failure to isolate range";
		goto failed_removal;
1515
	}
1516
	nr_isolate_pageblock = ret;
1517 1518 1519

	arg.start_pfn = start_pfn;
	arg.nr_pages = nr_pages;
1520
	node_states_check_changes_offline(nr_pages, zone, &arg);
1521 1522 1523

	ret = memory_notify(MEM_GOING_OFFLINE, &arg);
	ret = notifier_to_errno(ret);
1524 1525 1526 1527
	if (ret) {
		reason = "notifier failure";
		goto failed_removal_isolated;
	}
1528

1529 1530 1531 1532 1533 1534 1535
	do {
		for (pfn = start_pfn; pfn;) {
			if (signal_pending(current)) {
				ret = -EINTR;
				reason = "signal backoff";
				goto failed_removal_isolated;
			}
1536

1537 1538 1539 1540 1541 1542 1543 1544 1545 1546 1547 1548
			cond_resched();
			lru_add_drain_all();

			pfn = scan_movable_pages(pfn, end_pfn);
			if (pfn) {
				/*
				 * TODO: fatal migration failures should bail
				 * out
				 */
				do_migrate_range(pfn, end_pfn);
			}
		}
K
KAMEZAWA Hiroyuki 已提交
1549

1550 1551 1552 1553 1554 1555 1556 1557 1558 1559 1560
		/*
		 * 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 */
1561 1562 1563
		ret = walk_system_ram_range(start_pfn, end_pfn - start_pfn,
					    NULL, check_pages_isolated_cb);
	} while (ret);
1564

1565
	/* Ok, all of our target is isolated.
K
KAMEZAWA Hiroyuki 已提交
1566
	   We cannot do rollback at this point. */
1567 1568 1569
	walk_system_ram_range(start_pfn, end_pfn - start_pfn,
			      &offlined_pages, offline_isolated_pages_cb);
	pr_info("Offlined Pages %ld\n", offlined_pages);
1570 1571 1572 1573 1574 1575 1576 1577 1578
	/*
	 * 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 已提交
1579
	/* removal success */
1580
	adjust_managed_page_count(pfn_to_page(start_pfn), -offlined_pages);
K
KAMEZAWA Hiroyuki 已提交
1581
	zone->present_pages -= offlined_pages;
1582 1583

	pgdat_resize_lock(zone->zone_pgdat, &flags);
K
KAMEZAWA Hiroyuki 已提交
1584
	zone->zone_pgdat->node_present_pages -= offlined_pages;
1585
	pgdat_resize_unlock(zone->zone_pgdat, &flags);
1586

1587 1588
	init_per_zone_wmark_min();

1589
	if (!populated_zone(zone)) {
1590
		zone_pcp_reset(zone);
1591
		build_all_zonelists(NULL);
1592 1593
	} else
		zone_pcp_update(zone);
1594

1595
	node_states_clear_node(node, &arg);
1596
	if (arg.status_change_nid >= 0) {
1597
		kswapd_stop(node);
1598 1599
		kcompactd_stop(node);
	}
1600

K
KAMEZAWA Hiroyuki 已提交
1601 1602
	vm_total_pages = nr_free_pagecache_pages();
	writeback_set_ratelimit();
1603 1604

	memory_notify(MEM_OFFLINE, &arg);
1605
	mem_hotplug_done();
K
KAMEZAWA Hiroyuki 已提交
1606 1607
	return 0;

1608 1609
failed_removal_isolated:
	undo_isolate_page_range(start_pfn, end_pfn, MIGRATE_MOVABLE);
1610
	memory_notify(MEM_CANCEL_OFFLINE, &arg);
K
KAMEZAWA Hiroyuki 已提交
1611
failed_removal:
1612
	pr_debug("memory offlining [mem %#010llx-%#010llx] failed due to %s\n",
1613
		 (unsigned long long) start_pfn << PAGE_SHIFT,
1614 1615
		 ((unsigned long long) end_pfn << PAGE_SHIFT) - 1,
		 reason);
K
KAMEZAWA Hiroyuki 已提交
1616
	/* pushback to free area */
1617
	mem_hotplug_done();
K
KAMEZAWA Hiroyuki 已提交
1618 1619
	return ret;
}
1620

1621 1622
int offline_pages(unsigned long start_pfn, unsigned long nr_pages)
{
1623
	return __offline_pages(start_pfn, start_pfn + nr_pages);
1624 1625
}

1626
static int check_memblock_offlined_cb(struct memory_block *mem, void *arg)
1627 1628 1629
{
	int ret = !is_memblock_offlined(mem);

1630 1631 1632 1633
	if (unlikely(ret)) {
		phys_addr_t beginpa, endpa;

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

1638 1639 1640
		return -EBUSY;
	}
	return 0;
1641 1642
}

1643
static int check_cpu_on_node(pg_data_t *pgdat)
1644 1645 1646 1647 1648 1649 1650 1651 1652 1653 1654 1655 1656 1657 1658
{
	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;
}

1659 1660 1661 1662 1663 1664 1665 1666 1667 1668 1669 1670
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;
}

1671 1672
/**
 * try_offline_node
1673
 * @nid: the node ID
1674 1675 1676 1677 1678 1679
 *
 * 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.
 */
1680
void try_offline_node(int nid)
1681
{
1682
	pg_data_t *pgdat = NODE_DATA(nid);
1683
	int rc;
1684

1685 1686 1687 1688 1689 1690 1691
	/*
	 * 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;
1692

1693 1694 1695 1696 1697 1698 1699
	/*
	 * 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)
1700 1701
		return;

1702
	if (check_cpu_on_node(pgdat))
1703 1704 1705 1706 1707 1708 1709 1710 1711
		return;

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

1714 1715 1716 1717 1718 1719 1720 1721 1722 1723 1724 1725 1726 1727 1728 1729 1730 1731 1732 1733
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);
	}
}

1734
static int __ref try_remove_memory(int nid, u64 start, u64 size)
1735
{
1736
	int rc = 0;
1737

1738 1739
	BUG_ON(check_hotplug_memory_range(start, size));

1740
	mem_hotplug_begin();
1741 1742

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

1751 1752
	/* remove memmap entry */
	firmware_map_remove(start, start + size, "System RAM");
1753 1754
	memblock_free(start, size);
	memblock_remove(start, size);
1755 1756 1757

	/* remove memory block devices before removing memory */
	remove_memory_block_devices(start, size);
1758

1759
	arch_remove_memory(nid, start, size, NULL);
1760
	__release_memory_resource(start, size);
1761

1762 1763
	try_offline_node(nid);

1764
done:
1765
	mem_hotplug_done();
1766
	return rc;
1767
}
1768

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

1798
	lock_device_hotplug();
1799
	rc  = try_remove_memory(nid, start, size);
1800
	unlock_device_hotplug();
1801 1802

	return rc;
1803
}
1804
EXPORT_SYMBOL_GPL(remove_memory);
1805
#endif /* CONFIG_MEMORY_HOTREMOVE */