memory_hotplug.c 46.7 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 1204 1205 1206
 * 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 已提交
1207
 */
1208
static unsigned long scan_movable_pages(unsigned long start, unsigned long end)
K
KAMEZAWA Hiroyuki 已提交
1209 1210
{
	unsigned long pfn;
1211

K
KAMEZAWA Hiroyuki 已提交
1212
	for (pfn = start; pfn < end; pfn++) {
1213 1214 1215 1216 1217 1218 1219 1220 1221 1222 1223 1224 1225 1226
		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);
1227
		if (page_huge_active(head))
1228
			return pfn;
1229
		skip = compound_nr(head) - (page - head);
1230
		pfn += skip - 1;
K
KAMEZAWA Hiroyuki 已提交
1231 1232 1233 1234
	}
	return 0;
}

1235
static struct page *new_node_page(struct page *page, unsigned long private)
1236 1237
{
	int nid = page_to_nid(page);
1238
	nodemask_t nmask = node_states[N_MEMORY];
1239 1240 1241 1242 1243 1244 1245 1246 1247

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

1249
	return new_page_nodemask(page, nid, &nmask);
1250 1251
}

K
KAMEZAWA Hiroyuki 已提交
1252 1253 1254 1255 1256 1257 1258 1259
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);

1260
	for (pfn = start_pfn; pfn < end_pfn; pfn++) {
K
KAMEZAWA Hiroyuki 已提交
1261 1262 1263
		if (!pfn_valid(pfn))
			continue;
		page = pfn_to_page(pfn);
1264 1265 1266

		if (PageHuge(page)) {
			struct page *head = compound_head(page);
1267
			pfn = page_to_pfn(head) + compound_nr(head) - 1;
1268
			isolate_huge_page(head, &source);
1269
			continue;
M
Michal Hocko 已提交
1270
		} else if (PageTransHuge(page))
1271 1272
			pfn = page_to_pfn(compound_head(page))
				+ hpage_nr_pages(page) - 1;
1273

1274 1275 1276 1277 1278 1279 1280 1281 1282 1283 1284 1285 1286 1287 1288
		/*
		 * 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;
		}

1289
		if (!get_page_unless_zero(page))
K
KAMEZAWA Hiroyuki 已提交
1290 1291
			continue;
		/*
1292 1293
		 * We can skip free pages. And we can deal with pages on
		 * LRU and non-lru movable pages.
K
KAMEZAWA Hiroyuki 已提交
1294
		 */
1295 1296 1297 1298
		if (PageLRU(page))
			ret = isolate_lru_page(page);
		else
			ret = isolate_movable_page(page, ISOLATE_UNEVICTABLE);
K
KAMEZAWA Hiroyuki 已提交
1299
		if (!ret) { /* Success */
1300
			list_add_tail(&page->lru, &source);
1301 1302
			if (!__PageMovable(page))
				inc_node_page_state(page, NR_ISOLATED_ANON +
H
Huang Ying 已提交
1303
						    page_is_file_lru(page));
1304

K
KAMEZAWA Hiroyuki 已提交
1305
		} else {
1306
			pr_warn("failed to isolate pfn %lx\n", pfn);
1307
			dump_page(page, "isolation failed");
K
KAMEZAWA Hiroyuki 已提交
1308
		}
1309
		put_page(page);
K
KAMEZAWA Hiroyuki 已提交
1310
	}
1311
	if (!list_empty(&source)) {
1312 1313
		/* Allocate a new page from the nearest neighbor node */
		ret = migrate_pages(&source, new_node_page, NULL, 0,
1314
					MIGRATE_SYNC, MR_MEMORY_HOTPLUG);
1315 1316 1317 1318 1319 1320
		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");
			}
1321
			putback_movable_pages(&source);
1322
		}
K
KAMEZAWA Hiroyuki 已提交
1323
	}
1324

K
KAMEZAWA Hiroyuki 已提交
1325 1326 1327
	return ret;
}

1328
/* Mark all sections offline and remove all free pages from the buddy. */
K
KAMEZAWA Hiroyuki 已提交
1329 1330 1331 1332
static int
offline_isolated_pages_cb(unsigned long start, unsigned long nr_pages,
			void *data)
{
1333
	unsigned long *offlined_pages = (unsigned long *)data;
K
KAMEZAWA Hiroyuki 已提交
1334

1335 1336
	*offlined_pages += __offline_isolated_pages(start, start + nr_pages);
	return 0;
K
KAMEZAWA Hiroyuki 已提交
1337 1338 1339 1340 1341 1342 1343 1344 1345
}

/*
 * 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)
{
1346 1347
	return test_pages_isolated(start_pfn, start_pfn + nr_pages,
				   MEMORY_OFFLINE);
K
KAMEZAWA Hiroyuki 已提交
1348 1349
}

1350 1351
static int __init cmdline_parse_movable_node(char *p)
{
1352
	movable_node_enabled = true;
1353 1354 1355 1356
	return 0;
}
early_param("movable_node", cmdline_parse_movable_node);

1357 1358 1359 1360 1361 1362
/* 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;
1363
	enum zone_type zt;
1364

1365 1366 1367
	arg->status_change_nid = NUMA_NO_NODE;
	arg->status_change_nid_normal = NUMA_NO_NODE;
	arg->status_change_nid_high = NUMA_NO_NODE;
1368 1369

	/*
1370 1371 1372 1373 1374 1375
	 * 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].
1376
	 */
1377
	for (zt = 0; zt <= ZONE_NORMAL; zt++)
1378
		present_pages += pgdat->node_zones[zt].present_pages;
1379
	if (zone_idx(zone) <= ZONE_NORMAL && nr_pages >= present_pages)
1380 1381
		arg->status_change_nid_normal = zone_to_nid(zone);

1382 1383
#ifdef CONFIG_HIGHMEM
	/*
1384 1385 1386 1387 1388 1389
	 * 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.
1390
	 */
1391 1392
	present_pages += pgdat->node_zones[ZONE_HIGHMEM].present_pages;
	if (zone_idx(zone) <= ZONE_HIGHMEM && nr_pages >= present_pages)
1393 1394 1395
		arg->status_change_nid_high = zone_to_nid(zone);
#endif

1396
	/*
1397 1398 1399 1400 1401 1402 1403 1404
	 * 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.
1405
	 */
1406
	present_pages += pgdat->node_zones[ZONE_MOVABLE].present_pages;
1407 1408 1409 1410 1411 1412 1413 1414 1415 1416

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

1417
	if (arg->status_change_nid_high >= 0)
1418
		node_clear_state(node, N_HIGH_MEMORY);
1419

1420
	if (arg->status_change_nid >= 0)
1421
		node_clear_state(node, N_MEMORY);
1422 1423
}

1424 1425 1426 1427 1428 1429 1430 1431 1432
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;
}

1433
static int __ref __offline_pages(unsigned long start_pfn,
1434
		  unsigned long end_pfn)
K
KAMEZAWA Hiroyuki 已提交
1435
{
1436
	unsigned long pfn, nr_pages = 0;
1437
	unsigned long offlined_pages = 0;
1438
	int ret, node, nr_isolate_pageblock;
1439
	unsigned long flags;
K
KAMEZAWA Hiroyuki 已提交
1440
	struct zone *zone;
1441
	struct memory_notify arg;
1442
	char *reason;
K
KAMEZAWA Hiroyuki 已提交
1443

1444 1445
	mem_hotplug_begin();

1446 1447 1448 1449 1450 1451 1452 1453 1454 1455 1456 1457 1458 1459 1460 1461
	/*
	 * 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 已提交
1462 1463
	/* This makes hotplug much easier...and readable.
	   we assume this for now. .*/
1464 1465
	zone = test_pages_in_a_zone(start_pfn, end_pfn);
	if (!zone) {
1466 1467 1468
		ret = -EINVAL;
		reason = "multizone range";
		goto failed_removal;
1469
	}
1470 1471
	node = zone_to_nid(zone);

K
KAMEZAWA Hiroyuki 已提交
1472
	/* set above range as isolated */
1473
	ret = start_isolate_page_range(start_pfn, end_pfn,
1474
				       MIGRATE_MOVABLE,
1475
				       MEMORY_OFFLINE | REPORT_FAILURE);
1476
	if (ret < 0) {
1477 1478
		reason = "failure to isolate range";
		goto failed_removal;
1479
	}
1480
	nr_isolate_pageblock = ret;
1481 1482 1483

	arg.start_pfn = start_pfn;
	arg.nr_pages = nr_pages;
1484
	node_states_check_changes_offline(nr_pages, zone, &arg);
1485 1486 1487

	ret = memory_notify(MEM_GOING_OFFLINE, &arg);
	ret = notifier_to_errno(ret);
1488 1489 1490 1491
	if (ret) {
		reason = "notifier failure";
		goto failed_removal_isolated;
	}
1492

1493 1494 1495 1496 1497 1498 1499
	do {
		for (pfn = start_pfn; pfn;) {
			if (signal_pending(current)) {
				ret = -EINTR;
				reason = "signal backoff";
				goto failed_removal_isolated;
			}
1500

1501 1502 1503 1504 1505 1506 1507 1508 1509 1510 1511 1512
			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 已提交
1513

1514 1515 1516 1517 1518 1519 1520 1521 1522 1523 1524
		/*
		 * 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 */
1525 1526 1527
		ret = walk_system_ram_range(start_pfn, end_pfn - start_pfn,
					    NULL, check_pages_isolated_cb);
	} while (ret);
1528

1529
	/* Ok, all of our target is isolated.
K
KAMEZAWA Hiroyuki 已提交
1530
	   We cannot do rollback at this point. */
1531 1532 1533
	walk_system_ram_range(start_pfn, end_pfn - start_pfn,
			      &offlined_pages, offline_isolated_pages_cb);
	pr_info("Offlined Pages %ld\n", offlined_pages);
1534 1535 1536 1537 1538 1539 1540 1541 1542
	/*
	 * 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 已提交
1543
	/* removal success */
1544
	adjust_managed_page_count(pfn_to_page(start_pfn), -offlined_pages);
K
KAMEZAWA Hiroyuki 已提交
1545
	zone->present_pages -= offlined_pages;
1546 1547

	pgdat_resize_lock(zone->zone_pgdat, &flags);
K
KAMEZAWA Hiroyuki 已提交
1548
	zone->zone_pgdat->node_present_pages -= offlined_pages;
1549
	pgdat_resize_unlock(zone->zone_pgdat, &flags);
1550

1551 1552
	init_per_zone_wmark_min();

1553
	if (!populated_zone(zone)) {
1554
		zone_pcp_reset(zone);
1555
		build_all_zonelists(NULL);
1556 1557
	} else
		zone_pcp_update(zone);
1558

1559
	node_states_clear_node(node, &arg);
1560
	if (arg.status_change_nid >= 0) {
1561
		kswapd_stop(node);
1562 1563
		kcompactd_stop(node);
	}
1564

K
KAMEZAWA Hiroyuki 已提交
1565 1566
	vm_total_pages = nr_free_pagecache_pages();
	writeback_set_ratelimit();
1567 1568

	memory_notify(MEM_OFFLINE, &arg);
1569
	remove_pfn_range_from_zone(zone, start_pfn, nr_pages);
1570
	mem_hotplug_done();
K
KAMEZAWA Hiroyuki 已提交
1571 1572
	return 0;

1573 1574
failed_removal_isolated:
	undo_isolate_page_range(start_pfn, end_pfn, MIGRATE_MOVABLE);
1575
	memory_notify(MEM_CANCEL_OFFLINE, &arg);
K
KAMEZAWA Hiroyuki 已提交
1576
failed_removal:
1577
	pr_debug("memory offlining [mem %#010llx-%#010llx] failed due to %s\n",
1578
		 (unsigned long long) start_pfn << PAGE_SHIFT,
1579 1580
		 ((unsigned long long) end_pfn << PAGE_SHIFT) - 1,
		 reason);
K
KAMEZAWA Hiroyuki 已提交
1581
	/* pushback to free area */
1582
	mem_hotplug_done();
K
KAMEZAWA Hiroyuki 已提交
1583 1584
	return ret;
}
1585

1586 1587
int offline_pages(unsigned long start_pfn, unsigned long nr_pages)
{
1588
	return __offline_pages(start_pfn, start_pfn + nr_pages);
1589 1590
}

1591
static int check_memblock_offlined_cb(struct memory_block *mem, void *arg)
1592 1593 1594
{
	int ret = !is_memblock_offlined(mem);

1595 1596 1597 1598
	if (unlikely(ret)) {
		phys_addr_t beginpa, endpa;

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

1603 1604 1605
		return -EBUSY;
	}
	return 0;
1606 1607
}

1608
static int check_cpu_on_node(pg_data_t *pgdat)
1609 1610 1611 1612 1613 1614 1615 1616 1617 1618 1619 1620 1621 1622 1623
{
	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;
}

1624 1625 1626 1627 1628 1629 1630 1631 1632 1633 1634 1635
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;
}

1636 1637
/**
 * try_offline_node
1638
 * @nid: the node ID
1639 1640 1641 1642 1643 1644
 *
 * 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.
 */
1645
void try_offline_node(int nid)
1646
{
1647
	pg_data_t *pgdat = NODE_DATA(nid);
1648
	int rc;
1649

1650 1651 1652 1653 1654 1655 1656
	/*
	 * 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;
1657

1658 1659 1660 1661 1662 1663 1664
	/*
	 * 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)
1665 1666
		return;

1667
	if (check_cpu_on_node(pgdat))
1668 1669 1670 1671 1672 1673 1674 1675 1676
		return;

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

1679 1680 1681 1682 1683 1684 1685 1686 1687 1688 1689 1690 1691 1692 1693 1694 1695 1696 1697 1698
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);
	}
}

1699
static int __ref try_remove_memory(int nid, u64 start, u64 size)
1700
{
1701
	int rc = 0;
1702

1703 1704
	BUG_ON(check_hotplug_memory_range(start, size));

1705
	/*
1706
	 * All memory blocks must be offlined before removing memory.  Check
1707
	 * whether all memory blocks in question are offline and return error
1708
	 * if this is not the case.
1709
	 */
1710
	rc = walk_memory_blocks(start, size, NULL, check_memblock_offlined_cb);
1711 1712
	if (rc)
		goto done;
1713

1714 1715
	/* remove memmap entry */
	firmware_map_remove(start, start + size, "System RAM");
1716

1717 1718 1719 1720
	/*
	 * Memory block device removal under the device_hotplug_lock is
	 * a barrier against racing online attempts.
	 */
1721
	remove_memory_block_devices(start, size);
1722

1723 1724
	mem_hotplug_begin();

1725
	arch_remove_memory(nid, start, size, NULL);
1726 1727 1728 1729 1730 1731

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

1732
	__release_memory_resource(start, size);
1733

1734 1735
	try_offline_node(nid);

1736
done:
1737
	mem_hotplug_done();
1738
	return rc;
1739
}
1740

1741 1742 1743 1744 1745 1746 1747 1748 1749 1750 1751 1752 1753 1754
/**
 * 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 已提交
1755
	 * trigger BUG() if some memory is not offlined prior to calling this
1756 1757 1758 1759 1760 1761 1762 1763 1764 1765 1766
	 * 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)
1767
{
1768 1769
	int rc;

1770
	lock_device_hotplug();
1771
	rc  = try_remove_memory(nid, start, size);
1772
	unlock_device_hotplug();
1773 1774

	return rc;
1775
}
1776
EXPORT_SYMBOL_GPL(remove_memory);
1777
#endif /* CONFIG_MEMORY_HOTREMOVE */