xref: /linux/arch/riscv/mm/init.c (revision bb4b0f8a1bcbf8f4e3a0841aaefb3fd580d12fc9)
1 // SPDX-License-Identifier: GPL-2.0-only
2 /*
3  * Copyright (C) 2012 Regents of the University of California
4  * Copyright (C) 2019 Western Digital Corporation or its affiliates.
5  * Copyright (C) 2020 FORTH-ICS/CARV
6  *  Nick Kossifidis <mick@ics.forth.gr>
7  */
8 
9 #include <linux/init.h>
10 #include <linux/mm.h>
11 #include <linux/memblock.h>
12 #include <linux/initrd.h>
13 #include <linux/swap.h>
14 #include <linux/swiotlb.h>
15 #include <linux/sizes.h>
16 #include <linux/of_fdt.h>
17 #include <linux/of_reserved_mem.h>
18 #include <linux/libfdt.h>
19 #include <linux/set_memory.h>
20 #include <linux/dma-map-ops.h>
21 #include <linux/crash_dump.h>
22 #include <linux/hugetlb.h>
23 #include <linux/kfence.h>
24 #include <linux/execmem.h>
25 
26 #include <asm/fixmap.h>
27 #include <asm/io.h>
28 #include <asm/kasan.h>
29 #include <asm/module.h>
30 #include <asm/numa.h>
31 #include <asm/pgtable.h>
32 #include <asm/sections.h>
33 #include <asm/soc.h>
34 #include <asm/sparsemem.h>
35 #include <asm/tlbflush.h>
36 
37 #include "../kernel/head.h"
38 
39 u64 new_vmalloc[NR_CPUS / sizeof(u64) + 1];
40 
41 struct kernel_mapping kernel_map __ro_after_init;
42 EXPORT_SYMBOL(kernel_map);
43 #ifdef CONFIG_XIP_KERNEL
44 #define kernel_map	(*(struct kernel_mapping *)XIP_FIXUP(&kernel_map))
45 #endif
46 
47 #ifdef CONFIG_64BIT
48 u64 satp_mode __ro_after_init = !IS_ENABLED(CONFIG_XIP_KERNEL) ? SATP_MODE_57 : SATP_MODE_39;
49 #else
50 u64 satp_mode __ro_after_init = SATP_MODE_32;
51 #endif
52 EXPORT_SYMBOL(satp_mode);
53 
54 #ifdef CONFIG_64BIT
55 bool pgtable_l4_enabled __ro_after_init = !IS_ENABLED(CONFIG_XIP_KERNEL);
56 bool pgtable_l5_enabled __ro_after_init = !IS_ENABLED(CONFIG_XIP_KERNEL);
57 EXPORT_SYMBOL(pgtable_l4_enabled);
58 EXPORT_SYMBOL(pgtable_l5_enabled);
59 #endif
60 
61 phys_addr_t phys_ram_base __ro_after_init;
62 EXPORT_SYMBOL(phys_ram_base);
63 
64 #ifdef CONFIG_SPARSEMEM_VMEMMAP
65 #define VMEMMAP_ADDR_ALIGN	(1ULL << SECTION_SIZE_BITS)
66 
67 unsigned long vmemmap_start_pfn __ro_after_init;
68 EXPORT_SYMBOL(vmemmap_start_pfn);
69 #endif
70 
71 unsigned long empty_zero_page[PAGE_SIZE / sizeof(unsigned long)]
72 							__page_aligned_bss;
73 EXPORT_SYMBOL(empty_zero_page);
74 
75 extern char _start[];
76 void *_dtb_early_va __initdata;
77 uintptr_t _dtb_early_pa __initdata;
78 
79 phys_addr_t dma32_phys_limit __initdata;
80 
81 static void __init zone_sizes_init(void)
82 {
83 	unsigned long max_zone_pfns[MAX_NR_ZONES] = { 0, };
84 
85 #ifdef CONFIG_ZONE_DMA32
86 	max_zone_pfns[ZONE_DMA32] = PFN_DOWN(dma32_phys_limit);
87 #endif
88 	max_zone_pfns[ZONE_NORMAL] = max_low_pfn;
89 
90 	free_area_init(max_zone_pfns);
91 }
92 
93 #if defined(CONFIG_MMU) && defined(CONFIG_DEBUG_VM)
94 
95 #define LOG2_SZ_1K  ilog2(SZ_1K)
96 #define LOG2_SZ_1M  ilog2(SZ_1M)
97 #define LOG2_SZ_1G  ilog2(SZ_1G)
98 #define LOG2_SZ_1T  ilog2(SZ_1T)
99 
100 static inline void print_mlk(char *name, unsigned long b, unsigned long t)
101 {
102 	pr_notice("%12s : 0x%08lx - 0x%08lx   (%4ld kB)\n", name, b, t,
103 		  (((t) - (b)) >> LOG2_SZ_1K));
104 }
105 
106 static inline void print_mlm(char *name, unsigned long b, unsigned long t)
107 {
108 	pr_notice("%12s : 0x%08lx - 0x%08lx   (%4ld MB)\n", name, b, t,
109 		  (((t) - (b)) >> LOG2_SZ_1M));
110 }
111 
112 static inline void print_mlg(char *name, unsigned long b, unsigned long t)
113 {
114 	pr_notice("%12s : 0x%08lx - 0x%08lx   (%4ld GB)\n", name, b, t,
115 		   (((t) - (b)) >> LOG2_SZ_1G));
116 }
117 
118 #ifdef CONFIG_64BIT
119 static inline void print_mlt(char *name, unsigned long b, unsigned long t)
120 {
121 	pr_notice("%12s : 0x%08lx - 0x%08lx   (%4ld TB)\n", name, b, t,
122 		   (((t) - (b)) >> LOG2_SZ_1T));
123 }
124 #else
125 #define print_mlt(n, b, t) do {} while (0)
126 #endif
127 
128 static inline void print_ml(char *name, unsigned long b, unsigned long t)
129 {
130 	unsigned long diff = t - b;
131 
132 	if (IS_ENABLED(CONFIG_64BIT) && (diff >> LOG2_SZ_1T) >= 10)
133 		print_mlt(name, b, t);
134 	else if ((diff >> LOG2_SZ_1G) >= 10)
135 		print_mlg(name, b, t);
136 	else if ((diff >> LOG2_SZ_1M) >= 10)
137 		print_mlm(name, b, t);
138 	else
139 		print_mlk(name, b, t);
140 }
141 
142 static void __init print_vm_layout(void)
143 {
144 	pr_notice("Virtual kernel memory layout:\n");
145 	print_ml("fixmap", (unsigned long)FIXADDR_START,
146 		(unsigned long)FIXADDR_TOP);
147 	print_ml("pci io", (unsigned long)PCI_IO_START,
148 		(unsigned long)PCI_IO_END);
149 	print_ml("vmemmap", (unsigned long)VMEMMAP_START,
150 		(unsigned long)VMEMMAP_END);
151 	print_ml("vmalloc", (unsigned long)VMALLOC_START,
152 		(unsigned long)VMALLOC_END);
153 #ifdef CONFIG_64BIT
154 	print_ml("modules", (unsigned long)MODULES_VADDR,
155 		(unsigned long)MODULES_END);
156 #endif
157 	print_ml("lowmem", (unsigned long)PAGE_OFFSET,
158 		(unsigned long)high_memory);
159 	if (IS_ENABLED(CONFIG_64BIT)) {
160 #ifdef CONFIG_KASAN
161 		print_ml("kasan", KASAN_SHADOW_START, KASAN_SHADOW_END);
162 #endif
163 
164 		print_ml("kernel", (unsigned long)kernel_map.virt_addr,
165 			 (unsigned long)ADDRESS_SPACE_END);
166 	}
167 }
168 #else
169 static void print_vm_layout(void) { }
170 #endif /* CONFIG_DEBUG_VM */
171 
172 void __init arch_mm_preinit(void)
173 {
174 	bool swiotlb = max_pfn > PFN_DOWN(dma32_phys_limit);
175 #ifdef CONFIG_FLATMEM
176 	BUG_ON(!mem_map);
177 #endif /* CONFIG_FLATMEM */
178 
179 	if (IS_ENABLED(CONFIG_DMA_BOUNCE_UNALIGNED_KMALLOC) && !swiotlb &&
180 	    dma_cache_alignment != 1) {
181 		/*
182 		 * If no bouncing needed for ZONE_DMA, allocate 1MB swiotlb
183 		 * buffer per 1GB of RAM for kmalloc() bouncing on
184 		 * non-coherent platforms.
185 		 */
186 		unsigned long size =
187 			DIV_ROUND_UP(memblock_phys_mem_size(), 1024);
188 		swiotlb_adjust_size(min(swiotlb_size_or_default(), size));
189 		swiotlb = true;
190 	}
191 
192 	swiotlb_init(swiotlb, SWIOTLB_VERBOSE);
193 
194 	print_vm_layout();
195 }
196 
197 /* Limit the memory size via mem. */
198 static phys_addr_t memory_limit;
199 #ifdef CONFIG_XIP_KERNEL
200 #define memory_limit	(*(phys_addr_t *)XIP_FIXUP(&memory_limit))
201 #endif /* CONFIG_XIP_KERNEL */
202 
203 static int __init early_mem(char *p)
204 {
205 	u64 size;
206 
207 	if (!p)
208 		return 1;
209 
210 	size = memparse(p, &p) & PAGE_MASK;
211 	memory_limit = min_t(u64, size, memory_limit);
212 
213 	pr_notice("Memory limited to %lldMB\n", (u64)memory_limit >> 20);
214 
215 	return 0;
216 }
217 early_param("mem", early_mem);
218 
219 static void __init setup_bootmem(void)
220 {
221 	phys_addr_t vmlinux_end = __pa_symbol(&_end);
222 	phys_addr_t max_mapped_addr;
223 	phys_addr_t phys_ram_end, vmlinux_start;
224 
225 	if (IS_ENABLED(CONFIG_XIP_KERNEL))
226 		vmlinux_start = __pa_symbol(&_sdata);
227 	else
228 		vmlinux_start = __pa_symbol(&_start);
229 
230 	memblock_enforce_memory_limit(memory_limit);
231 
232 	/*
233 	 * Make sure we align the reservation on PMD_SIZE since we will
234 	 * map the kernel in the linear mapping as read-only: we do not want
235 	 * any allocation to happen between _end and the next pmd aligned page.
236 	 */
237 	if (IS_ENABLED(CONFIG_64BIT) && IS_ENABLED(CONFIG_STRICT_KERNEL_RWX))
238 		vmlinux_end = (vmlinux_end + PMD_SIZE - 1) & PMD_MASK;
239 	/*
240 	 * Reserve from the start of the kernel to the end of the kernel
241 	 */
242 	memblock_reserve(vmlinux_start, vmlinux_end - vmlinux_start);
243 
244 	/*
245 	 * Make sure we align the start of the memory on a PMD boundary so that
246 	 * at worst, we map the linear mapping with PMD mappings.
247 	 */
248 	if (!IS_ENABLED(CONFIG_XIP_KERNEL)) {
249 		phys_ram_base = memblock_start_of_DRAM() & PMD_MASK;
250 #ifdef CONFIG_SPARSEMEM_VMEMMAP
251 		vmemmap_start_pfn = round_down(phys_ram_base, VMEMMAP_ADDR_ALIGN) >> PAGE_SHIFT;
252 #endif
253 	}
254 
255 	/*
256 	 * In 64-bit, any use of __va/__pa before this point is wrong as we
257 	 * did not know the start of DRAM before.
258 	 */
259 	if (IS_ENABLED(CONFIG_64BIT) && IS_ENABLED(CONFIG_MMU))
260 		kernel_map.va_pa_offset = PAGE_OFFSET - phys_ram_base;
261 
262 	/*
263 	 * The size of the linear page mapping may restrict the amount of
264 	 * usable RAM.
265 	 */
266 	if (IS_ENABLED(CONFIG_64BIT) && IS_ENABLED(CONFIG_MMU)) {
267 		max_mapped_addr = __pa(PAGE_OFFSET) + KERN_VIRT_SIZE;
268 		if (memblock_end_of_DRAM() > max_mapped_addr) {
269 			memblock_cap_memory_range(phys_ram_base,
270 						  max_mapped_addr - phys_ram_base);
271 			pr_warn("Physical memory overflows the linear mapping size: region above %pa removed",
272 				&max_mapped_addr);
273 		}
274 	}
275 
276 	/*
277 	 * Reserve physical address space that would be mapped to virtual
278 	 * addresses greater than (void *)(-PAGE_SIZE) because:
279 	 *  - This memory would overlap with ERR_PTR
280 	 *  - This memory belongs to high memory, which is not supported
281 	 *
282 	 * This is not applicable to 64-bit kernel, because virtual addresses
283 	 * after (void *)(-PAGE_SIZE) are not linearly mapped: they are
284 	 * occupied by kernel mapping. Also it is unrealistic for high memory
285 	 * to exist on 64-bit platforms.
286 	 */
287 	if (!IS_ENABLED(CONFIG_64BIT)) {
288 		max_mapped_addr = __va_to_pa_nodebug(-PAGE_SIZE);
289 		memblock_reserve(max_mapped_addr, (phys_addr_t)-max_mapped_addr);
290 	}
291 
292 	phys_ram_end = memblock_end_of_DRAM();
293 	min_low_pfn = PFN_UP(phys_ram_base);
294 	max_low_pfn = max_pfn = PFN_DOWN(phys_ram_end);
295 
296 	dma32_phys_limit = min(4UL * SZ_1G, (unsigned long)PFN_PHYS(max_low_pfn));
297 
298 	reserve_initrd_mem();
299 
300 	/*
301 	 * No allocation should be done before reserving the memory as defined
302 	 * in the device tree, otherwise the allocation could end up in a
303 	 * reserved region.
304 	 */
305 	early_init_fdt_scan_reserved_mem();
306 
307 	/*
308 	 * If DTB is built in, no need to reserve its memblock.
309 	 * Otherwise, do reserve it but avoid using
310 	 * early_init_fdt_reserve_self() since __pa() does
311 	 * not work for DTB pointers that are fixmap addresses
312 	 */
313 	if (!IS_ENABLED(CONFIG_BUILTIN_DTB))
314 		memblock_reserve(dtb_early_pa, fdt_totalsize(dtb_early_va));
315 
316 	dma_contiguous_reserve(dma32_phys_limit);
317 	if (IS_ENABLED(CONFIG_64BIT))
318 		hugetlb_cma_reserve(PUD_SHIFT - PAGE_SHIFT);
319 }
320 
321 #ifdef CONFIG_RELOCATABLE
322 extern unsigned long __rela_dyn_start, __rela_dyn_end;
323 
324 static void __init relocate_kernel(void)
325 {
326 	Elf_Rela *rela = (Elf_Rela *)&__rela_dyn_start;
327 	/*
328 	 * This holds the offset between the linked virtual address and the
329 	 * relocated virtual address.
330 	 */
331 	uintptr_t reloc_offset = kernel_map.virt_addr - KERNEL_LINK_ADDR;
332 	/*
333 	 * This holds the offset between kernel linked virtual address and
334 	 * physical address.
335 	 */
336 	uintptr_t va_kernel_link_pa_offset = KERNEL_LINK_ADDR - kernel_map.phys_addr;
337 
338 	for ( ; rela < (Elf_Rela *)&__rela_dyn_end; rela++) {
339 		Elf_Addr addr = (rela->r_offset - va_kernel_link_pa_offset);
340 		Elf_Addr relocated_addr = rela->r_addend;
341 
342 		if (rela->r_info != R_RISCV_RELATIVE)
343 			continue;
344 
345 		/*
346 		 * Make sure to not relocate vdso symbols like rt_sigreturn
347 		 * which are linked from the address 0 in vmlinux since
348 		 * vdso symbol addresses are actually used as an offset from
349 		 * mm->context.vdso in VDSO_OFFSET macro.
350 		 */
351 		if (relocated_addr >= KERNEL_LINK_ADDR)
352 			relocated_addr += reloc_offset;
353 
354 		*(Elf_Addr *)addr = relocated_addr;
355 	}
356 }
357 #endif /* CONFIG_RELOCATABLE */
358 
359 #ifdef CONFIG_MMU
360 struct pt_alloc_ops pt_ops __meminitdata;
361 
362 pgd_t swapper_pg_dir[PTRS_PER_PGD] __page_aligned_bss;
363 pgd_t trampoline_pg_dir[PTRS_PER_PGD] __page_aligned_bss;
364 static pte_t fixmap_pte[PTRS_PER_PTE] __page_aligned_bss;
365 
366 pgd_t early_pg_dir[PTRS_PER_PGD] __initdata __aligned(PAGE_SIZE);
367 
368 #ifdef CONFIG_XIP_KERNEL
369 #define pt_ops			(*(struct pt_alloc_ops *)XIP_FIXUP(&pt_ops))
370 #define trampoline_pg_dir      ((pgd_t *)XIP_FIXUP(trampoline_pg_dir))
371 #define fixmap_pte             ((pte_t *)XIP_FIXUP(fixmap_pte))
372 #define early_pg_dir           ((pgd_t *)XIP_FIXUP(early_pg_dir))
373 #endif /* CONFIG_XIP_KERNEL */
374 
375 static const pgprot_t protection_map[16] = {
376 	[VM_NONE]					= PAGE_NONE,
377 	[VM_READ]					= PAGE_READ,
378 	[VM_WRITE]					= PAGE_COPY,
379 	[VM_WRITE | VM_READ]				= PAGE_COPY,
380 	[VM_EXEC]					= PAGE_EXEC,
381 	[VM_EXEC | VM_READ]				= PAGE_READ_EXEC,
382 	[VM_EXEC | VM_WRITE]				= PAGE_COPY_EXEC,
383 	[VM_EXEC | VM_WRITE | VM_READ]			= PAGE_COPY_EXEC,
384 	[VM_SHARED]					= PAGE_NONE,
385 	[VM_SHARED | VM_READ]				= PAGE_READ,
386 	[VM_SHARED | VM_WRITE]				= PAGE_SHARED,
387 	[VM_SHARED | VM_WRITE | VM_READ]		= PAGE_SHARED,
388 	[VM_SHARED | VM_EXEC]				= PAGE_EXEC,
389 	[VM_SHARED | VM_EXEC | VM_READ]			= PAGE_READ_EXEC,
390 	[VM_SHARED | VM_EXEC | VM_WRITE]		= PAGE_SHARED_EXEC,
391 	[VM_SHARED | VM_EXEC | VM_WRITE | VM_READ]	= PAGE_SHARED_EXEC
392 };
393 DECLARE_VM_GET_PAGE_PROT
394 
395 void __set_fixmap(enum fixed_addresses idx, phys_addr_t phys, pgprot_t prot)
396 {
397 	unsigned long addr = __fix_to_virt(idx);
398 	pte_t *ptep;
399 
400 	BUG_ON(idx <= FIX_HOLE || idx >= __end_of_fixed_addresses);
401 
402 	ptep = &fixmap_pte[pte_index(addr)];
403 
404 	if (pgprot_val(prot))
405 		set_pte(ptep, pfn_pte(phys >> PAGE_SHIFT, prot));
406 	else
407 		pte_clear(&init_mm, addr, ptep);
408 	local_flush_tlb_page(addr);
409 }
410 
411 static inline pte_t *__init get_pte_virt_early(phys_addr_t pa)
412 {
413 	return (pte_t *)((uintptr_t)pa);
414 }
415 
416 static inline pte_t *__init get_pte_virt_fixmap(phys_addr_t pa)
417 {
418 	clear_fixmap(FIX_PTE);
419 	return (pte_t *)set_fixmap_offset(FIX_PTE, pa);
420 }
421 
422 static inline pte_t *__meminit get_pte_virt_late(phys_addr_t pa)
423 {
424 	return (pte_t *) __va(pa);
425 }
426 
427 static inline phys_addr_t __init alloc_pte_early(uintptr_t va)
428 {
429 	/*
430 	 * We only create PMD or PGD early mappings so we
431 	 * should never reach here with MMU disabled.
432 	 */
433 	BUG();
434 }
435 
436 static inline phys_addr_t __init alloc_pte_fixmap(uintptr_t va)
437 {
438 	return memblock_phys_alloc(PAGE_SIZE, PAGE_SIZE);
439 }
440 
441 static phys_addr_t __meminit alloc_pte_late(uintptr_t va)
442 {
443 	struct ptdesc *ptdesc = pagetable_alloc(GFP_KERNEL & ~__GFP_HIGHMEM, 0);
444 
445 	/*
446 	 * We do not know which mm the PTE page is associated to at this point.
447 	 * Passing NULL to the ctor is the safe option, though it may result
448 	 * in unnecessary work (e.g. initialising the ptlock for init_mm).
449 	 */
450 	BUG_ON(!ptdesc || !pagetable_pte_ctor(NULL, ptdesc));
451 	return __pa((pte_t *)ptdesc_address(ptdesc));
452 }
453 
454 static void __meminit create_pte_mapping(pte_t *ptep, uintptr_t va, phys_addr_t pa, phys_addr_t sz,
455 					 pgprot_t prot)
456 {
457 	uintptr_t pte_idx = pte_index(va);
458 
459 	BUG_ON(sz != PAGE_SIZE);
460 
461 	if (pte_none(ptep[pte_idx]))
462 		ptep[pte_idx] = pfn_pte(PFN_DOWN(pa), prot);
463 }
464 
465 #ifndef __PAGETABLE_PMD_FOLDED
466 
467 static pmd_t trampoline_pmd[PTRS_PER_PMD] __page_aligned_bss;
468 static pmd_t fixmap_pmd[PTRS_PER_PMD] __page_aligned_bss;
469 static pmd_t early_pmd[PTRS_PER_PMD] __initdata __aligned(PAGE_SIZE);
470 
471 #ifdef CONFIG_XIP_KERNEL
472 #define trampoline_pmd ((pmd_t *)XIP_FIXUP(trampoline_pmd))
473 #define fixmap_pmd     ((pmd_t *)XIP_FIXUP(fixmap_pmd))
474 #define early_pmd      ((pmd_t *)XIP_FIXUP(early_pmd))
475 #endif /* CONFIG_XIP_KERNEL */
476 
477 static p4d_t trampoline_p4d[PTRS_PER_P4D] __page_aligned_bss;
478 static p4d_t fixmap_p4d[PTRS_PER_P4D] __page_aligned_bss;
479 static p4d_t early_p4d[PTRS_PER_P4D] __initdata __aligned(PAGE_SIZE);
480 
481 #ifdef CONFIG_XIP_KERNEL
482 #define trampoline_p4d ((p4d_t *)XIP_FIXUP(trampoline_p4d))
483 #define fixmap_p4d     ((p4d_t *)XIP_FIXUP(fixmap_p4d))
484 #define early_p4d      ((p4d_t *)XIP_FIXUP(early_p4d))
485 #endif /* CONFIG_XIP_KERNEL */
486 
487 static pud_t trampoline_pud[PTRS_PER_PUD] __page_aligned_bss;
488 static pud_t fixmap_pud[PTRS_PER_PUD] __page_aligned_bss;
489 static pud_t early_pud[PTRS_PER_PUD] __initdata __aligned(PAGE_SIZE);
490 
491 #ifdef CONFIG_XIP_KERNEL
492 #define trampoline_pud ((pud_t *)XIP_FIXUP(trampoline_pud))
493 #define fixmap_pud     ((pud_t *)XIP_FIXUP(fixmap_pud))
494 #define early_pud      ((pud_t *)XIP_FIXUP(early_pud))
495 #endif /* CONFIG_XIP_KERNEL */
496 
497 static pmd_t *__init get_pmd_virt_early(phys_addr_t pa)
498 {
499 	/* Before MMU is enabled */
500 	return (pmd_t *)((uintptr_t)pa);
501 }
502 
503 static pmd_t *__init get_pmd_virt_fixmap(phys_addr_t pa)
504 {
505 	clear_fixmap(FIX_PMD);
506 	return (pmd_t *)set_fixmap_offset(FIX_PMD, pa);
507 }
508 
509 static pmd_t *__meminit get_pmd_virt_late(phys_addr_t pa)
510 {
511 	return (pmd_t *) __va(pa);
512 }
513 
514 static phys_addr_t __init alloc_pmd_early(uintptr_t va)
515 {
516 	BUG_ON((va - kernel_map.virt_addr) >> PUD_SHIFT);
517 
518 	return (uintptr_t)early_pmd;
519 }
520 
521 static phys_addr_t __init alloc_pmd_fixmap(uintptr_t va)
522 {
523 	return memblock_phys_alloc(PAGE_SIZE, PAGE_SIZE);
524 }
525 
526 static phys_addr_t __meminit alloc_pmd_late(uintptr_t va)
527 {
528 	struct ptdesc *ptdesc = pagetable_alloc(GFP_KERNEL & ~__GFP_HIGHMEM, 0);
529 
530 	/* See comment in alloc_pte_late() regarding NULL passed the ctor */
531 	BUG_ON(!ptdesc || !pagetable_pmd_ctor(NULL, ptdesc));
532 	return __pa((pmd_t *)ptdesc_address(ptdesc));
533 }
534 
535 static void __meminit create_pmd_mapping(pmd_t *pmdp,
536 					 uintptr_t va, phys_addr_t pa,
537 					 phys_addr_t sz, pgprot_t prot)
538 {
539 	pte_t *ptep;
540 	phys_addr_t pte_phys;
541 	uintptr_t pmd_idx = pmd_index(va);
542 
543 	if (sz == PMD_SIZE) {
544 		if (pmd_none(pmdp[pmd_idx]))
545 			pmdp[pmd_idx] = pfn_pmd(PFN_DOWN(pa), prot);
546 		return;
547 	}
548 
549 	if (pmd_none(pmdp[pmd_idx])) {
550 		pte_phys = pt_ops.alloc_pte(va);
551 		pmdp[pmd_idx] = pfn_pmd(PFN_DOWN(pte_phys), PAGE_TABLE);
552 		ptep = pt_ops.get_pte_virt(pte_phys);
553 		memset(ptep, 0, PAGE_SIZE);
554 	} else {
555 		pte_phys = PFN_PHYS(_pmd_pfn(pmdp[pmd_idx]));
556 		ptep = pt_ops.get_pte_virt(pte_phys);
557 	}
558 
559 	create_pte_mapping(ptep, va, pa, sz, prot);
560 }
561 
562 static pud_t *__init get_pud_virt_early(phys_addr_t pa)
563 {
564 	return (pud_t *)((uintptr_t)pa);
565 }
566 
567 static pud_t *__init get_pud_virt_fixmap(phys_addr_t pa)
568 {
569 	clear_fixmap(FIX_PUD);
570 	return (pud_t *)set_fixmap_offset(FIX_PUD, pa);
571 }
572 
573 static pud_t *__meminit get_pud_virt_late(phys_addr_t pa)
574 {
575 	return (pud_t *)__va(pa);
576 }
577 
578 static phys_addr_t __init alloc_pud_early(uintptr_t va)
579 {
580 	/* Only one PUD is available for early mapping */
581 	BUG_ON((va - kernel_map.virt_addr) >> PGDIR_SHIFT);
582 
583 	return (uintptr_t)early_pud;
584 }
585 
586 static phys_addr_t __init alloc_pud_fixmap(uintptr_t va)
587 {
588 	return memblock_phys_alloc(PAGE_SIZE, PAGE_SIZE);
589 }
590 
591 static phys_addr_t __meminit alloc_pud_late(uintptr_t va)
592 {
593 	struct ptdesc *ptdesc = pagetable_alloc(GFP_KERNEL, 0);
594 
595 	BUG_ON(!ptdesc);
596 	pagetable_pud_ctor(ptdesc);
597 	return __pa((pud_t *)ptdesc_address(ptdesc));
598 }
599 
600 static p4d_t *__init get_p4d_virt_early(phys_addr_t pa)
601 {
602 	return (p4d_t *)((uintptr_t)pa);
603 }
604 
605 static p4d_t *__init get_p4d_virt_fixmap(phys_addr_t pa)
606 {
607 	clear_fixmap(FIX_P4D);
608 	return (p4d_t *)set_fixmap_offset(FIX_P4D, pa);
609 }
610 
611 static p4d_t *__meminit get_p4d_virt_late(phys_addr_t pa)
612 {
613 	return (p4d_t *)__va(pa);
614 }
615 
616 static phys_addr_t __init alloc_p4d_early(uintptr_t va)
617 {
618 	/* Only one P4D is available for early mapping */
619 	BUG_ON((va - kernel_map.virt_addr) >> PGDIR_SHIFT);
620 
621 	return (uintptr_t)early_p4d;
622 }
623 
624 static phys_addr_t __init alloc_p4d_fixmap(uintptr_t va)
625 {
626 	return memblock_phys_alloc(PAGE_SIZE, PAGE_SIZE);
627 }
628 
629 static phys_addr_t __meminit alloc_p4d_late(uintptr_t va)
630 {
631 	struct ptdesc *ptdesc = pagetable_alloc(GFP_KERNEL, 0);
632 
633 	BUG_ON(!ptdesc);
634 	pagetable_p4d_ctor(ptdesc);
635 	return __pa((p4d_t *)ptdesc_address(ptdesc));
636 }
637 
638 static void __meminit create_pud_mapping(pud_t *pudp, uintptr_t va, phys_addr_t pa, phys_addr_t sz,
639 					 pgprot_t prot)
640 {
641 	pmd_t *nextp;
642 	phys_addr_t next_phys;
643 	uintptr_t pud_index = pud_index(va);
644 
645 	if (sz == PUD_SIZE) {
646 		if (pud_val(pudp[pud_index]) == 0)
647 			pudp[pud_index] = pfn_pud(PFN_DOWN(pa), prot);
648 		return;
649 	}
650 
651 	if (pud_val(pudp[pud_index]) == 0) {
652 		next_phys = pt_ops.alloc_pmd(va);
653 		pudp[pud_index] = pfn_pud(PFN_DOWN(next_phys), PAGE_TABLE);
654 		nextp = pt_ops.get_pmd_virt(next_phys);
655 		memset(nextp, 0, PAGE_SIZE);
656 	} else {
657 		next_phys = PFN_PHYS(_pud_pfn(pudp[pud_index]));
658 		nextp = pt_ops.get_pmd_virt(next_phys);
659 	}
660 
661 	create_pmd_mapping(nextp, va, pa, sz, prot);
662 }
663 
664 static void __meminit create_p4d_mapping(p4d_t *p4dp, uintptr_t va, phys_addr_t pa, phys_addr_t sz,
665 					 pgprot_t prot)
666 {
667 	pud_t *nextp;
668 	phys_addr_t next_phys;
669 	uintptr_t p4d_index = p4d_index(va);
670 
671 	if (sz == P4D_SIZE) {
672 		if (p4d_val(p4dp[p4d_index]) == 0)
673 			p4dp[p4d_index] = pfn_p4d(PFN_DOWN(pa), prot);
674 		return;
675 	}
676 
677 	if (p4d_val(p4dp[p4d_index]) == 0) {
678 		next_phys = pt_ops.alloc_pud(va);
679 		p4dp[p4d_index] = pfn_p4d(PFN_DOWN(next_phys), PAGE_TABLE);
680 		nextp = pt_ops.get_pud_virt(next_phys);
681 		memset(nextp, 0, PAGE_SIZE);
682 	} else {
683 		next_phys = PFN_PHYS(_p4d_pfn(p4dp[p4d_index]));
684 		nextp = pt_ops.get_pud_virt(next_phys);
685 	}
686 
687 	create_pud_mapping(nextp, va, pa, sz, prot);
688 }
689 
690 #define pgd_next_t		p4d_t
691 #define alloc_pgd_next(__va)	(pgtable_l5_enabled ?			\
692 		pt_ops.alloc_p4d(__va) : (pgtable_l4_enabled ?		\
693 		pt_ops.alloc_pud(__va) : pt_ops.alloc_pmd(__va)))
694 #define get_pgd_next_virt(__pa)	(pgtable_l5_enabled ?			\
695 		pt_ops.get_p4d_virt(__pa) : (pgd_next_t *)(pgtable_l4_enabled ?	\
696 		pt_ops.get_pud_virt(__pa) : (pud_t *)pt_ops.get_pmd_virt(__pa)))
697 #define create_pgd_next_mapping(__nextp, __va, __pa, __sz, __prot)	\
698 				(pgtable_l5_enabled ?			\
699 		create_p4d_mapping(__nextp, __va, __pa, __sz, __prot) : \
700 				(pgtable_l4_enabled ?			\
701 		create_pud_mapping((pud_t *)__nextp, __va, __pa, __sz, __prot) :	\
702 		create_pmd_mapping((pmd_t *)__nextp, __va, __pa, __sz, __prot)))
703 #define fixmap_pgd_next		(pgtable_l5_enabled ?			\
704 		(uintptr_t)fixmap_p4d : (pgtable_l4_enabled ?		\
705 		(uintptr_t)fixmap_pud : (uintptr_t)fixmap_pmd))
706 #define trampoline_pgd_next	(pgtable_l5_enabled ?			\
707 		(uintptr_t)trampoline_p4d : (pgtable_l4_enabled ?	\
708 		(uintptr_t)trampoline_pud : (uintptr_t)trampoline_pmd))
709 #else
710 #define pgd_next_t		pte_t
711 #define alloc_pgd_next(__va)	pt_ops.alloc_pte(__va)
712 #define get_pgd_next_virt(__pa)	pt_ops.get_pte_virt(__pa)
713 #define create_pgd_next_mapping(__nextp, __va, __pa, __sz, __prot)	\
714 	create_pte_mapping(__nextp, __va, __pa, __sz, __prot)
715 #define fixmap_pgd_next		((uintptr_t)fixmap_pte)
716 #define create_p4d_mapping(__pmdp, __va, __pa, __sz, __prot) do {} while(0)
717 #define create_pud_mapping(__pmdp, __va, __pa, __sz, __prot) do {} while(0)
718 #define create_pmd_mapping(__pmdp, __va, __pa, __sz, __prot) do {} while(0)
719 #endif /* __PAGETABLE_PMD_FOLDED */
720 
721 void __meminit create_pgd_mapping(pgd_t *pgdp, uintptr_t va, phys_addr_t pa, phys_addr_t sz,
722 				  pgprot_t prot)
723 {
724 	pgd_next_t *nextp;
725 	phys_addr_t next_phys;
726 	uintptr_t pgd_idx = pgd_index(va);
727 
728 	if (sz == PGDIR_SIZE) {
729 		if (pgd_val(pgdp[pgd_idx]) == 0)
730 			pgdp[pgd_idx] = pfn_pgd(PFN_DOWN(pa), prot);
731 		return;
732 	}
733 
734 	if (pgd_val(pgdp[pgd_idx]) == 0) {
735 		next_phys = alloc_pgd_next(va);
736 		pgdp[pgd_idx] = pfn_pgd(PFN_DOWN(next_phys), PAGE_TABLE);
737 		nextp = get_pgd_next_virt(next_phys);
738 		memset(nextp, 0, PAGE_SIZE);
739 	} else {
740 		next_phys = PFN_PHYS(_pgd_pfn(pgdp[pgd_idx]));
741 		nextp = get_pgd_next_virt(next_phys);
742 	}
743 
744 	create_pgd_next_mapping(nextp, va, pa, sz, prot);
745 }
746 
747 static uintptr_t __meminit best_map_size(phys_addr_t pa, uintptr_t va, phys_addr_t size)
748 {
749 	if (debug_pagealloc_enabled())
750 		return PAGE_SIZE;
751 
752 	if (pgtable_l5_enabled &&
753 	    !(pa & (P4D_SIZE - 1)) && !(va & (P4D_SIZE - 1)) && size >= P4D_SIZE)
754 		return P4D_SIZE;
755 
756 	if (pgtable_l4_enabled &&
757 	    !(pa & (PUD_SIZE - 1)) && !(va & (PUD_SIZE - 1)) && size >= PUD_SIZE)
758 		return PUD_SIZE;
759 
760 	if (IS_ENABLED(CONFIG_64BIT) &&
761 	    !(pa & (PMD_SIZE - 1)) && !(va & (PMD_SIZE - 1)) && size >= PMD_SIZE)
762 		return PMD_SIZE;
763 
764 	return PAGE_SIZE;
765 }
766 
767 #ifdef CONFIG_XIP_KERNEL
768 #define phys_ram_base  (*(phys_addr_t *)XIP_FIXUP(&phys_ram_base))
769 extern char _xiprom[], _exiprom[], __data_loc;
770 
771 /* called from head.S with MMU off */
772 asmlinkage void __init __copy_data(void)
773 {
774 	void *from = (void *)(&__data_loc);
775 	void *to = (void *)CONFIG_PHYS_RAM_BASE;
776 	size_t sz = (size_t)((uintptr_t)(&_end) - (uintptr_t)(&_sdata));
777 
778 	memcpy(to, from, sz);
779 }
780 #endif
781 
782 #ifdef CONFIG_STRICT_KERNEL_RWX
783 static __meminit pgprot_t pgprot_from_va(uintptr_t va)
784 {
785 	if (is_va_kernel_text(va))
786 		return PAGE_KERNEL_READ_EXEC;
787 
788 	/*
789 	 * In 64-bit kernel, the kernel mapping is outside the linear mapping so
790 	 * we must protect its linear mapping alias from being executed and
791 	 * written.
792 	 * And rodata section is marked readonly in mark_rodata_ro.
793 	 */
794 	if (IS_ENABLED(CONFIG_64BIT) && is_va_kernel_lm_alias_text(va))
795 		return PAGE_KERNEL_READ;
796 
797 	return PAGE_KERNEL;
798 }
799 
800 void mark_rodata_ro(void)
801 {
802 	set_kernel_memory(__start_rodata, _data, set_memory_ro);
803 	if (IS_ENABLED(CONFIG_64BIT))
804 		set_kernel_memory(lm_alias(__start_rodata), lm_alias(_data),
805 				  set_memory_ro);
806 }
807 #else
808 static __meminit pgprot_t pgprot_from_va(uintptr_t va)
809 {
810 	if (IS_ENABLED(CONFIG_64BIT) && !is_kernel_mapping(va))
811 		return PAGE_KERNEL;
812 
813 	return PAGE_KERNEL_EXEC;
814 }
815 #endif /* CONFIG_STRICT_KERNEL_RWX */
816 
817 #if defined(CONFIG_64BIT) && !defined(CONFIG_XIP_KERNEL)
818 u64 __pi_set_satp_mode_from_cmdline(uintptr_t dtb_pa);
819 u64 __pi_set_satp_mode_from_fdt(uintptr_t dtb_pa);
820 
821 static void __init disable_pgtable_l5(void)
822 {
823 	pgtable_l5_enabled = false;
824 	kernel_map.page_offset = PAGE_OFFSET_L4;
825 	satp_mode = SATP_MODE_48;
826 }
827 
828 static void __init disable_pgtable_l4(void)
829 {
830 	pgtable_l4_enabled = false;
831 	kernel_map.page_offset = PAGE_OFFSET_L3;
832 	satp_mode = SATP_MODE_39;
833 }
834 
835 static int __init print_no4lvl(char *p)
836 {
837 	pr_info("Disabled 4-level and 5-level paging");
838 	return 0;
839 }
840 early_param("no4lvl", print_no4lvl);
841 
842 static int __init print_no5lvl(char *p)
843 {
844 	pr_info("Disabled 5-level paging");
845 	return 0;
846 }
847 early_param("no5lvl", print_no5lvl);
848 
849 static void __init set_mmap_rnd_bits_max(void)
850 {
851 	mmap_rnd_bits_max = MMAP_VA_BITS - PAGE_SHIFT - 3;
852 }
853 
854 /*
855  * There is a simple way to determine if 4-level is supported by the
856  * underlying hardware: establish 1:1 mapping in 4-level page table mode
857  * then read SATP to see if the configuration was taken into account
858  * meaning sv48 is supported.
859  * The maximum SATP mode is limited by both the command line and the "mmu-type"
860  * property in the device tree, since some platforms may hang if an unsupported
861  * SATP mode is attempted.
862  */
863 static __init void set_satp_mode(uintptr_t dtb_pa)
864 {
865 	u64 identity_satp, hw_satp;
866 	uintptr_t set_satp_mode_pmd = ((unsigned long)set_satp_mode) & PMD_MASK;
867 	u64 satp_mode_limit = min_not_zero(__pi_set_satp_mode_from_cmdline(dtb_pa),
868 					   __pi_set_satp_mode_from_fdt(dtb_pa));
869 
870 	kernel_map.page_offset = PAGE_OFFSET_L5;
871 
872 	if (satp_mode_limit == SATP_MODE_48) {
873 		disable_pgtable_l5();
874 	} else if (satp_mode_limit == SATP_MODE_39) {
875 		disable_pgtable_l5();
876 		disable_pgtable_l4();
877 		return;
878 	}
879 
880 	create_p4d_mapping(early_p4d,
881 			set_satp_mode_pmd, (uintptr_t)early_pud,
882 			P4D_SIZE, PAGE_TABLE);
883 	create_pud_mapping(early_pud,
884 			   set_satp_mode_pmd, (uintptr_t)early_pmd,
885 			   PUD_SIZE, PAGE_TABLE);
886 	/* Handle the case where set_satp_mode straddles 2 PMDs */
887 	create_pmd_mapping(early_pmd,
888 			   set_satp_mode_pmd, set_satp_mode_pmd,
889 			   PMD_SIZE, PAGE_KERNEL_EXEC);
890 	create_pmd_mapping(early_pmd,
891 			   set_satp_mode_pmd + PMD_SIZE,
892 			   set_satp_mode_pmd + PMD_SIZE,
893 			   PMD_SIZE, PAGE_KERNEL_EXEC);
894 retry:
895 	create_pgd_mapping(early_pg_dir,
896 			   set_satp_mode_pmd,
897 			   pgtable_l5_enabled ?
898 				(uintptr_t)early_p4d : (uintptr_t)early_pud,
899 			   PGDIR_SIZE, PAGE_TABLE);
900 
901 	identity_satp = PFN_DOWN((uintptr_t)&early_pg_dir) | satp_mode;
902 
903 	local_flush_tlb_all();
904 	csr_write(CSR_SATP, identity_satp);
905 	hw_satp = csr_swap(CSR_SATP, 0ULL);
906 	local_flush_tlb_all();
907 
908 	if (hw_satp != identity_satp) {
909 		if (pgtable_l5_enabled) {
910 			disable_pgtable_l5();
911 			memset(early_pg_dir, 0, PAGE_SIZE);
912 			goto retry;
913 		}
914 		disable_pgtable_l4();
915 	}
916 
917 	memset(early_pg_dir, 0, PAGE_SIZE);
918 	memset(early_p4d, 0, PAGE_SIZE);
919 	memset(early_pud, 0, PAGE_SIZE);
920 	memset(early_pmd, 0, PAGE_SIZE);
921 }
922 #endif
923 
924 /*
925  * setup_vm() is called from head.S with MMU-off.
926  *
927  * Following requirements should be honoured for setup_vm() to work
928  * correctly:
929  * 1) It should use PC-relative addressing for accessing kernel symbols.
930  *    To achieve this we always use GCC cmodel=medany.
931  * 2) The compiler instrumentation for FTRACE will not work for setup_vm()
932  *    so disable compiler instrumentation when FTRACE is enabled.
933  *
934  * Currently, the above requirements are honoured by using custom CFLAGS
935  * for init.o in mm/Makefile.
936  */
937 
938 #ifndef __riscv_cmodel_medany
939 #error "setup_vm() is called from head.S before relocate so it should not use absolute addressing."
940 #endif
941 
942 #ifdef CONFIG_XIP_KERNEL
943 static void __init create_kernel_page_table(pgd_t *pgdir,
944 					    __always_unused bool early)
945 {
946 	uintptr_t va, start_va, end_va;
947 
948 	/* Map the flash resident part */
949 	end_va = kernel_map.virt_addr + kernel_map.xiprom_sz;
950 	for (va = kernel_map.virt_addr; va < end_va; va += PMD_SIZE)
951 		create_pgd_mapping(pgdir, va,
952 				   kernel_map.xiprom + (va - kernel_map.virt_addr),
953 				   PMD_SIZE, PAGE_KERNEL_EXEC);
954 
955 	/* Map the data in RAM */
956 	start_va = kernel_map.virt_addr + (uintptr_t)&_sdata - (uintptr_t)&_start;
957 	end_va = kernel_map.virt_addr + kernel_map.size;
958 	for (va = start_va; va < end_va; va += PMD_SIZE)
959 		create_pgd_mapping(pgdir, va,
960 				   kernel_map.phys_addr + (va - start_va),
961 				   PMD_SIZE, PAGE_KERNEL);
962 }
963 #else
964 static void __init create_kernel_page_table(pgd_t *pgdir, bool early)
965 {
966 	uintptr_t va, end_va;
967 
968 	end_va = kernel_map.virt_addr + kernel_map.size;
969 	for (va = kernel_map.virt_addr; va < end_va; va += PMD_SIZE)
970 		create_pgd_mapping(pgdir, va,
971 				   kernel_map.phys_addr + (va - kernel_map.virt_addr),
972 				   PMD_SIZE,
973 				   early ?
974 					PAGE_KERNEL_EXEC : pgprot_from_va(va));
975 }
976 #endif
977 
978 /*
979  * Setup a 4MB mapping that encompasses the device tree: for 64-bit kernel,
980  * this means 2 PMD entries whereas for 32-bit kernel, this is only 1 PGDIR
981  * entry.
982  */
983 static void __init create_fdt_early_page_table(uintptr_t fix_fdt_va,
984 					       uintptr_t dtb_pa)
985 {
986 #ifndef CONFIG_BUILTIN_DTB
987 	uintptr_t pa = dtb_pa & ~(PMD_SIZE - 1);
988 
989 	/* Make sure the fdt fixmap address is always aligned on PMD size */
990 	BUILD_BUG_ON(FIX_FDT % (PMD_SIZE / PAGE_SIZE));
991 
992 	/* In 32-bit only, the fdt lies in its own PGD */
993 	if (!IS_ENABLED(CONFIG_64BIT)) {
994 		create_pgd_mapping(early_pg_dir, fix_fdt_va,
995 				   pa, MAX_FDT_SIZE, PAGE_KERNEL);
996 	} else {
997 		create_pmd_mapping(fixmap_pmd, fix_fdt_va,
998 				   pa, PMD_SIZE, PAGE_KERNEL);
999 		create_pmd_mapping(fixmap_pmd, fix_fdt_va + PMD_SIZE,
1000 				   pa + PMD_SIZE, PMD_SIZE, PAGE_KERNEL);
1001 	}
1002 
1003 	dtb_early_va = (void *)fix_fdt_va + (dtb_pa & (PMD_SIZE - 1));
1004 #else
1005 	/*
1006 	 * For 64-bit kernel, __va can't be used since it would return a linear
1007 	 * mapping address whereas dtb_early_va will be used before
1008 	 * setup_vm_final installs the linear mapping. For 32-bit kernel, as the
1009 	 * kernel is mapped in the linear mapping, that makes no difference.
1010 	 */
1011 	dtb_early_va = kernel_mapping_pa_to_va(dtb_pa);
1012 #endif
1013 
1014 	dtb_early_pa = dtb_pa;
1015 }
1016 
1017 /*
1018  * MMU is not enabled, the page tables are allocated directly using
1019  * early_pmd/pud/p4d and the address returned is the physical one.
1020  */
1021 static void __init pt_ops_set_early(void)
1022 {
1023 	pt_ops.alloc_pte = alloc_pte_early;
1024 	pt_ops.get_pte_virt = get_pte_virt_early;
1025 #ifndef __PAGETABLE_PMD_FOLDED
1026 	pt_ops.alloc_pmd = alloc_pmd_early;
1027 	pt_ops.get_pmd_virt = get_pmd_virt_early;
1028 	pt_ops.alloc_pud = alloc_pud_early;
1029 	pt_ops.get_pud_virt = get_pud_virt_early;
1030 	pt_ops.alloc_p4d = alloc_p4d_early;
1031 	pt_ops.get_p4d_virt = get_p4d_virt_early;
1032 #endif
1033 }
1034 
1035 /*
1036  * MMU is enabled but page table setup is not complete yet.
1037  * fixmap page table alloc functions must be used as a means to temporarily
1038  * map the allocated physical pages since the linear mapping does not exist yet.
1039  *
1040  * Note that this is called with MMU disabled, hence kernel_mapping_pa_to_va,
1041  * but it will be used as described above.
1042  */
1043 static void __init pt_ops_set_fixmap(void)
1044 {
1045 	pt_ops.alloc_pte = kernel_mapping_pa_to_va(alloc_pte_fixmap);
1046 	pt_ops.get_pte_virt = kernel_mapping_pa_to_va(get_pte_virt_fixmap);
1047 #ifndef __PAGETABLE_PMD_FOLDED
1048 	pt_ops.alloc_pmd = kernel_mapping_pa_to_va(alloc_pmd_fixmap);
1049 	pt_ops.get_pmd_virt = kernel_mapping_pa_to_va(get_pmd_virt_fixmap);
1050 	pt_ops.alloc_pud = kernel_mapping_pa_to_va(alloc_pud_fixmap);
1051 	pt_ops.get_pud_virt = kernel_mapping_pa_to_va(get_pud_virt_fixmap);
1052 	pt_ops.alloc_p4d = kernel_mapping_pa_to_va(alloc_p4d_fixmap);
1053 	pt_ops.get_p4d_virt = kernel_mapping_pa_to_va(get_p4d_virt_fixmap);
1054 #endif
1055 }
1056 
1057 /*
1058  * MMU is enabled and page table setup is complete, so from now, we can use
1059  * generic page allocation functions to setup page table.
1060  */
1061 static void __init pt_ops_set_late(void)
1062 {
1063 	pt_ops.alloc_pte = alloc_pte_late;
1064 	pt_ops.get_pte_virt = get_pte_virt_late;
1065 #ifndef __PAGETABLE_PMD_FOLDED
1066 	pt_ops.alloc_pmd = alloc_pmd_late;
1067 	pt_ops.get_pmd_virt = get_pmd_virt_late;
1068 	pt_ops.alloc_pud = alloc_pud_late;
1069 	pt_ops.get_pud_virt = get_pud_virt_late;
1070 	pt_ops.alloc_p4d = alloc_p4d_late;
1071 	pt_ops.get_p4d_virt = get_p4d_virt_late;
1072 #endif
1073 }
1074 
1075 #ifdef CONFIG_RANDOMIZE_BASE
1076 extern bool __init __pi_set_nokaslr_from_cmdline(uintptr_t dtb_pa);
1077 extern u64 __init __pi_get_kaslr_seed(uintptr_t dtb_pa);
1078 extern u64 __init __pi_get_kaslr_seed_zkr(const uintptr_t dtb_pa);
1079 
1080 static int __init print_nokaslr(char *p)
1081 {
1082 	pr_info("Disabled KASLR");
1083 	return 0;
1084 }
1085 early_param("nokaslr", print_nokaslr);
1086 
1087 unsigned long kaslr_offset(void)
1088 {
1089 	return kernel_map.virt_offset;
1090 }
1091 #endif
1092 
1093 asmlinkage void __init setup_vm(uintptr_t dtb_pa)
1094 {
1095 	pmd_t __maybe_unused fix_bmap_spmd, fix_bmap_epmd;
1096 
1097 #ifdef CONFIG_RANDOMIZE_BASE
1098 	if (!__pi_set_nokaslr_from_cmdline(dtb_pa)) {
1099 		u64 kaslr_seed = __pi_get_kaslr_seed_zkr(dtb_pa);
1100 		u32 kernel_size = (uintptr_t)(&_end) - (uintptr_t)(&_start);
1101 		u32 nr_pos;
1102 
1103 		if (kaslr_seed == 0)
1104 			kaslr_seed = __pi_get_kaslr_seed(dtb_pa);
1105 		/*
1106 		 * Compute the number of positions available: we are limited
1107 		 * by the early page table that only has one PUD and we must
1108 		 * be aligned on PMD_SIZE.
1109 		 */
1110 		nr_pos = (PUD_SIZE - kernel_size) / PMD_SIZE;
1111 
1112 		kernel_map.virt_offset = (kaslr_seed % nr_pos) * PMD_SIZE;
1113 	}
1114 #endif
1115 
1116 	kernel_map.virt_addr = KERNEL_LINK_ADDR + kernel_map.virt_offset;
1117 
1118 #ifdef CONFIG_XIP_KERNEL
1119 	kernel_map.xiprom = (uintptr_t)CONFIG_XIP_PHYS_ADDR;
1120 	kernel_map.xiprom_sz = (uintptr_t)(&_exiprom) - (uintptr_t)(&_xiprom);
1121 
1122 	phys_ram_base = CONFIG_PHYS_RAM_BASE;
1123 #ifdef CONFIG_SPARSEMEM_VMEMMAP
1124 	vmemmap_start_pfn = round_down(phys_ram_base, VMEMMAP_ADDR_ALIGN) >> PAGE_SHIFT;
1125 #endif
1126 	kernel_map.phys_addr = (uintptr_t)CONFIG_PHYS_RAM_BASE;
1127 	kernel_map.size = (uintptr_t)(&_end) - (uintptr_t)(&_start);
1128 
1129 	kernel_map.va_kernel_xip_text_pa_offset = kernel_map.virt_addr - kernel_map.xiprom;
1130 	kernel_map.va_kernel_xip_data_pa_offset = kernel_map.virt_addr - kernel_map.phys_addr
1131 						+ (uintptr_t)&_sdata - (uintptr_t)&_start;
1132 #else
1133 	kernel_map.phys_addr = (uintptr_t)(&_start);
1134 	kernel_map.size = (uintptr_t)(&_end) - kernel_map.phys_addr;
1135 	kernel_map.va_kernel_pa_offset = kernel_map.virt_addr - kernel_map.phys_addr;
1136 #endif
1137 
1138 #if defined(CONFIG_64BIT) && !defined(CONFIG_XIP_KERNEL)
1139 	set_satp_mode(dtb_pa);
1140 	set_mmap_rnd_bits_max();
1141 #endif
1142 
1143 	/*
1144 	 * In 64-bit, we defer the setup of va_pa_offset to setup_bootmem,
1145 	 * where we have the system memory layout: this allows us to align
1146 	 * the physical and virtual mappings and then make use of PUD/P4D/PGD
1147 	 * for the linear mapping. This is only possible because the kernel
1148 	 * mapping lies outside the linear mapping.
1149 	 * In 32-bit however, as the kernel resides in the linear mapping,
1150 	 * setup_vm_final can not change the mapping established here,
1151 	 * otherwise the same kernel addresses would get mapped to different
1152 	 * physical addresses (if the start of dram is different from the
1153 	 * kernel physical address start).
1154 	 */
1155 	kernel_map.va_pa_offset = IS_ENABLED(CONFIG_64BIT) ?
1156 				0UL : PAGE_OFFSET - kernel_map.phys_addr;
1157 
1158 	memory_limit = KERN_VIRT_SIZE;
1159 
1160 	/* Sanity check alignment and size */
1161 	BUG_ON((PAGE_OFFSET % PGDIR_SIZE) != 0);
1162 	BUG_ON((kernel_map.phys_addr % PMD_SIZE) != 0);
1163 
1164 #ifdef CONFIG_64BIT
1165 	/*
1166 	 * The last 4K bytes of the addressable memory can not be mapped because
1167 	 * of IS_ERR_VALUE macro.
1168 	 */
1169 	BUG_ON((kernel_map.virt_addr + kernel_map.size) > ADDRESS_SPACE_END - SZ_4K);
1170 #endif
1171 
1172 #ifdef CONFIG_RELOCATABLE
1173 	/*
1174 	 * Early page table uses only one PUD, which makes it possible
1175 	 * to map PUD_SIZE aligned on PUD_SIZE: if the relocation offset
1176 	 * makes the kernel cross over a PUD_SIZE boundary, raise a bug
1177 	 * since a part of the kernel would not get mapped.
1178 	 */
1179 	if (IS_ENABLED(CONFIG_64BIT))
1180 		BUG_ON(PUD_SIZE - (kernel_map.virt_addr & (PUD_SIZE - 1)) < kernel_map.size);
1181 	relocate_kernel();
1182 #endif
1183 
1184 	apply_early_boot_alternatives();
1185 	pt_ops_set_early();
1186 
1187 	/* Setup early PGD for fixmap */
1188 	create_pgd_mapping(early_pg_dir, FIXADDR_START,
1189 			   fixmap_pgd_next, PGDIR_SIZE, PAGE_TABLE);
1190 
1191 #ifndef __PAGETABLE_PMD_FOLDED
1192 	/* Setup fixmap P4D and PUD */
1193 	if (pgtable_l5_enabled)
1194 		create_p4d_mapping(fixmap_p4d, FIXADDR_START,
1195 				   (uintptr_t)fixmap_pud, P4D_SIZE, PAGE_TABLE);
1196 	/* Setup fixmap PUD and PMD */
1197 	if (pgtable_l4_enabled)
1198 		create_pud_mapping(fixmap_pud, FIXADDR_START,
1199 				   (uintptr_t)fixmap_pmd, PUD_SIZE, PAGE_TABLE);
1200 	create_pmd_mapping(fixmap_pmd, FIXADDR_START,
1201 			   (uintptr_t)fixmap_pte, PMD_SIZE, PAGE_TABLE);
1202 	/* Setup trampoline PGD and PMD */
1203 	create_pgd_mapping(trampoline_pg_dir, kernel_map.virt_addr,
1204 			   trampoline_pgd_next, PGDIR_SIZE, PAGE_TABLE);
1205 	if (pgtable_l5_enabled)
1206 		create_p4d_mapping(trampoline_p4d, kernel_map.virt_addr,
1207 				   (uintptr_t)trampoline_pud, P4D_SIZE, PAGE_TABLE);
1208 	if (pgtable_l4_enabled)
1209 		create_pud_mapping(trampoline_pud, kernel_map.virt_addr,
1210 				   (uintptr_t)trampoline_pmd, PUD_SIZE, PAGE_TABLE);
1211 #ifdef CONFIG_XIP_KERNEL
1212 	create_pmd_mapping(trampoline_pmd, kernel_map.virt_addr,
1213 			   kernel_map.xiprom, PMD_SIZE, PAGE_KERNEL_EXEC);
1214 #else
1215 	create_pmd_mapping(trampoline_pmd, kernel_map.virt_addr,
1216 			   kernel_map.phys_addr, PMD_SIZE, PAGE_KERNEL_EXEC);
1217 #endif
1218 #else
1219 	/* Setup trampoline PGD */
1220 	create_pgd_mapping(trampoline_pg_dir, kernel_map.virt_addr,
1221 			   kernel_map.phys_addr, PGDIR_SIZE, PAGE_KERNEL_EXEC);
1222 #endif
1223 
1224 	/*
1225 	 * Setup early PGD covering entire kernel which will allow
1226 	 * us to reach paging_init(). We map all memory banks later
1227 	 * in setup_vm_final() below.
1228 	 */
1229 	create_kernel_page_table(early_pg_dir, true);
1230 
1231 	/* Setup early mapping for FDT early scan */
1232 	create_fdt_early_page_table(__fix_to_virt(FIX_FDT), dtb_pa);
1233 
1234 	/*
1235 	 * Bootime fixmap only can handle PMD_SIZE mapping. Thus, boot-ioremap
1236 	 * range can not span multiple pmds.
1237 	 */
1238 	BUG_ON((__fix_to_virt(FIX_BTMAP_BEGIN) >> PMD_SHIFT)
1239 		     != (__fix_to_virt(FIX_BTMAP_END) >> PMD_SHIFT));
1240 
1241 #ifndef __PAGETABLE_PMD_FOLDED
1242 	/*
1243 	 * Early ioremap fixmap is already created as it lies within first 2MB
1244 	 * of fixmap region. We always map PMD_SIZE. Thus, both FIX_BTMAP_END
1245 	 * FIX_BTMAP_BEGIN should lie in the same pmd. Verify that and warn
1246 	 * the user if not.
1247 	 */
1248 	fix_bmap_spmd = fixmap_pmd[pmd_index(__fix_to_virt(FIX_BTMAP_BEGIN))];
1249 	fix_bmap_epmd = fixmap_pmd[pmd_index(__fix_to_virt(FIX_BTMAP_END))];
1250 	if (pmd_val(fix_bmap_spmd) != pmd_val(fix_bmap_epmd)) {
1251 		WARN_ON(1);
1252 		pr_warn("fixmap btmap start [%08lx] != end [%08lx]\n",
1253 			pmd_val(fix_bmap_spmd), pmd_val(fix_bmap_epmd));
1254 		pr_warn("fix_to_virt(FIX_BTMAP_BEGIN): %08lx\n",
1255 			fix_to_virt(FIX_BTMAP_BEGIN));
1256 		pr_warn("fix_to_virt(FIX_BTMAP_END):   %08lx\n",
1257 			fix_to_virt(FIX_BTMAP_END));
1258 
1259 		pr_warn("FIX_BTMAP_END:       %d\n", FIX_BTMAP_END);
1260 		pr_warn("FIX_BTMAP_BEGIN:     %d\n", FIX_BTMAP_BEGIN);
1261 	}
1262 #endif
1263 
1264 	pt_ops_set_fixmap();
1265 }
1266 
1267 static void __meminit create_linear_mapping_range(phys_addr_t start, phys_addr_t end,
1268 						  uintptr_t fixed_map_size, const pgprot_t *pgprot)
1269 {
1270 	phys_addr_t pa;
1271 	uintptr_t va, map_size;
1272 
1273 	for (pa = start; pa < end; pa += map_size) {
1274 		va = (uintptr_t)__va(pa);
1275 		map_size = fixed_map_size ? fixed_map_size :
1276 					    best_map_size(pa, va, end - pa);
1277 
1278 		create_pgd_mapping(swapper_pg_dir, va, pa, map_size,
1279 				   pgprot ? *pgprot : pgprot_from_va(va));
1280 	}
1281 }
1282 
1283 static void __init create_linear_mapping_page_table(void)
1284 {
1285 	phys_addr_t start, end;
1286 	phys_addr_t kfence_pool __maybe_unused;
1287 	u64 i;
1288 
1289 #ifdef CONFIG_STRICT_KERNEL_RWX
1290 	phys_addr_t ktext_start = __pa_symbol(_start);
1291 	phys_addr_t ktext_size = __init_data_begin - _start;
1292 	phys_addr_t krodata_start = __pa_symbol(__start_rodata);
1293 	phys_addr_t krodata_size = _data - __start_rodata;
1294 
1295 	/* Isolate kernel text and rodata so they don't get mapped with a PUD */
1296 	memblock_mark_nomap(ktext_start,  ktext_size);
1297 	memblock_mark_nomap(krodata_start, krodata_size);
1298 #endif
1299 
1300 #ifdef CONFIG_KFENCE
1301 	/*
1302 	 *  kfence pool must be backed by PAGE_SIZE mappings, so allocate it
1303 	 *  before we setup the linear mapping so that we avoid using hugepages
1304 	 *  for this region.
1305 	 */
1306 	kfence_pool = memblock_phys_alloc(KFENCE_POOL_SIZE, PAGE_SIZE);
1307 	BUG_ON(!kfence_pool);
1308 
1309 	memblock_mark_nomap(kfence_pool, KFENCE_POOL_SIZE);
1310 	__kfence_pool = __va(kfence_pool);
1311 #endif
1312 
1313 	/* Map all memory banks in the linear mapping */
1314 	for_each_mem_range(i, &start, &end) {
1315 		if (start >= end)
1316 			break;
1317 		if (start <= __pa(PAGE_OFFSET) &&
1318 		    __pa(PAGE_OFFSET) < end)
1319 			start = __pa(PAGE_OFFSET);
1320 
1321 		create_linear_mapping_range(start, end, 0, NULL);
1322 	}
1323 
1324 #ifdef CONFIG_STRICT_KERNEL_RWX
1325 	create_linear_mapping_range(ktext_start, ktext_start + ktext_size, 0, NULL);
1326 	create_linear_mapping_range(krodata_start, krodata_start + krodata_size, 0, NULL);
1327 
1328 	memblock_clear_nomap(ktext_start,  ktext_size);
1329 	memblock_clear_nomap(krodata_start, krodata_size);
1330 #endif
1331 
1332 #ifdef CONFIG_KFENCE
1333 	create_linear_mapping_range(kfence_pool, kfence_pool + KFENCE_POOL_SIZE, PAGE_SIZE, NULL);
1334 
1335 	memblock_clear_nomap(kfence_pool, KFENCE_POOL_SIZE);
1336 #endif
1337 }
1338 
1339 static void __init setup_vm_final(void)
1340 {
1341 	/* Setup swapper PGD for fixmap */
1342 #if !defined(CONFIG_64BIT)
1343 	/*
1344 	 * In 32-bit, the device tree lies in a pgd entry, so it must be copied
1345 	 * directly in swapper_pg_dir in addition to the pgd entry that points
1346 	 * to fixmap_pte.
1347 	 */
1348 	unsigned long idx = pgd_index(__fix_to_virt(FIX_FDT));
1349 
1350 	set_pgd(&swapper_pg_dir[idx], early_pg_dir[idx]);
1351 #endif
1352 	create_pgd_mapping(swapper_pg_dir, FIXADDR_START,
1353 			   __pa_symbol(fixmap_pgd_next),
1354 			   PGDIR_SIZE, PAGE_TABLE);
1355 
1356 	/* Map the linear mapping */
1357 	create_linear_mapping_page_table();
1358 
1359 	/* Map the kernel */
1360 	if (IS_ENABLED(CONFIG_64BIT))
1361 		create_kernel_page_table(swapper_pg_dir, false);
1362 
1363 #ifdef CONFIG_KASAN
1364 	kasan_swapper_init();
1365 #endif
1366 
1367 	/* Clear fixmap PTE and PMD mappings */
1368 	clear_fixmap(FIX_PTE);
1369 	clear_fixmap(FIX_PMD);
1370 	clear_fixmap(FIX_PUD);
1371 	clear_fixmap(FIX_P4D);
1372 
1373 	/* Move to swapper page table */
1374 	csr_write(CSR_SATP, PFN_DOWN(__pa_symbol(swapper_pg_dir)) | satp_mode);
1375 	local_flush_tlb_all();
1376 
1377 	pt_ops_set_late();
1378 }
1379 #else
1380 asmlinkage void __init setup_vm(uintptr_t dtb_pa)
1381 {
1382 	dtb_early_va = (void *)dtb_pa;
1383 	dtb_early_pa = dtb_pa;
1384 
1385 #ifdef CONFIG_RELOCATABLE
1386 	kernel_map.virt_addr = (uintptr_t)_start;
1387 	kernel_map.phys_addr = (uintptr_t)_start;
1388 	relocate_kernel();
1389 #endif
1390 }
1391 
1392 static inline void setup_vm_final(void)
1393 {
1394 }
1395 #endif /* CONFIG_MMU */
1396 
1397 /*
1398  * reserve_crashkernel() - reserves memory for crash kernel
1399  *
1400  * This function reserves memory area given in "crashkernel=" kernel command
1401  * line parameter. The memory reserved is used by dump capture kernel when
1402  * primary kernel is crashing.
1403  */
1404 static void __init arch_reserve_crashkernel(void)
1405 {
1406 	unsigned long long low_size = 0;
1407 	unsigned long long crash_base, crash_size;
1408 	bool high = false;
1409 	int ret;
1410 
1411 	if (!IS_ENABLED(CONFIG_CRASH_RESERVE))
1412 		return;
1413 
1414 	ret = parse_crashkernel(boot_command_line, memblock_phys_mem_size(),
1415 				&crash_size, &crash_base,
1416 				&low_size, NULL, &high);
1417 	if (ret)
1418 		return;
1419 
1420 	reserve_crashkernel_generic(crash_size, crash_base, low_size, high);
1421 }
1422 
1423 void __init paging_init(void)
1424 {
1425 	setup_bootmem();
1426 	setup_vm_final();
1427 
1428 	/* Depend on that Linear Mapping is ready */
1429 	memblock_allow_resize();
1430 }
1431 
1432 void __init misc_mem_init(void)
1433 {
1434 	early_memtest(min_low_pfn << PAGE_SHIFT, max_low_pfn << PAGE_SHIFT);
1435 	arch_numa_init();
1436 	sparse_init();
1437 #ifdef CONFIG_SPARSEMEM_VMEMMAP
1438 	/* The entire VMEMMAP region has been populated. Flush TLB for this region */
1439 	local_flush_tlb_kernel_range(VMEMMAP_START, VMEMMAP_END);
1440 #endif
1441 	zone_sizes_init();
1442 	arch_reserve_crashkernel();
1443 	memblock_dump_all();
1444 }
1445 
1446 #ifdef CONFIG_SPARSEMEM_VMEMMAP
1447 void __meminit vmemmap_set_pmd(pmd_t *pmd, void *p, int node,
1448 			       unsigned long addr, unsigned long next)
1449 {
1450 	pmd_set_huge(pmd, virt_to_phys(p), PAGE_KERNEL);
1451 }
1452 
1453 int __meminit vmemmap_check_pmd(pmd_t *pmdp, int node,
1454 				unsigned long addr, unsigned long next)
1455 {
1456 	vmemmap_verify((pte_t *)pmdp, node, addr, next);
1457 	return 1;
1458 }
1459 
1460 int __meminit vmemmap_populate(unsigned long start, unsigned long end, int node,
1461 			       struct vmem_altmap *altmap)
1462 {
1463 	/*
1464 	 * Note that SPARSEMEM_VMEMMAP is only selected for rv64 and that we
1465 	 * can't use hugepage mappings for 2-level page table because in case of
1466 	 * memory hotplug, we are not able to update all the page tables with
1467 	 * the new PMDs.
1468 	 */
1469 	return vmemmap_populate_hugepages(start, end, node, altmap);
1470 }
1471 #endif
1472 
1473 #if defined(CONFIG_MMU) && defined(CONFIG_64BIT)
1474 /*
1475  * Pre-allocates page-table pages for a specific area in the kernel
1476  * page-table. Only the level which needs to be synchronized between
1477  * all page-tables is allocated because the synchronization can be
1478  * expensive.
1479  */
1480 static void __init preallocate_pgd_pages_range(unsigned long start, unsigned long end,
1481 					       const char *area)
1482 {
1483 	unsigned long addr;
1484 	const char *lvl;
1485 
1486 	for (addr = start; addr < end && addr >= start; addr = ALIGN(addr + 1, PGDIR_SIZE)) {
1487 		pgd_t *pgd = pgd_offset_k(addr);
1488 		p4d_t *p4d;
1489 		pud_t *pud;
1490 		pmd_t *pmd;
1491 
1492 		lvl = "p4d";
1493 		p4d = p4d_alloc(&init_mm, pgd, addr);
1494 		if (!p4d)
1495 			goto failed;
1496 
1497 		if (pgtable_l5_enabled)
1498 			continue;
1499 
1500 		lvl = "pud";
1501 		pud = pud_alloc(&init_mm, p4d, addr);
1502 		if (!pud)
1503 			goto failed;
1504 
1505 		if (pgtable_l4_enabled)
1506 			continue;
1507 
1508 		lvl = "pmd";
1509 		pmd = pmd_alloc(&init_mm, pud, addr);
1510 		if (!pmd)
1511 			goto failed;
1512 	}
1513 	return;
1514 
1515 failed:
1516 	/*
1517 	 * The pages have to be there now or they will be missing in
1518 	 * process page-tables later.
1519 	 */
1520 	panic("Failed to pre-allocate %s pages for %s area\n", lvl, area);
1521 }
1522 
1523 #define PAGE_END KASAN_SHADOW_START
1524 
1525 void __init pgtable_cache_init(void)
1526 {
1527 	preallocate_pgd_pages_range(VMALLOC_START, VMALLOC_END, "vmalloc");
1528 	if (IS_ENABLED(CONFIG_MODULES))
1529 		preallocate_pgd_pages_range(MODULES_VADDR, MODULES_END, "bpf/modules");
1530 	if (IS_ENABLED(CONFIG_MEMORY_HOTPLUG)) {
1531 		preallocate_pgd_pages_range(VMEMMAP_START, VMEMMAP_END, "vmemmap");
1532 		preallocate_pgd_pages_range(PAGE_OFFSET, PAGE_END, "direct map");
1533 		if (IS_ENABLED(CONFIG_KASAN))
1534 			preallocate_pgd_pages_range(KASAN_SHADOW_START, KASAN_SHADOW_END, "kasan");
1535 	}
1536 }
1537 #endif
1538 
1539 #ifdef CONFIG_EXECMEM
1540 #ifdef CONFIG_MMU
1541 static struct execmem_info execmem_info __ro_after_init;
1542 
1543 struct execmem_info __init *execmem_arch_setup(void)
1544 {
1545 	execmem_info = (struct execmem_info){
1546 		.ranges = {
1547 			[EXECMEM_DEFAULT] = {
1548 				.start	= MODULES_VADDR,
1549 				.end	= MODULES_END,
1550 				.pgprot	= PAGE_KERNEL,
1551 				.alignment = 1,
1552 			},
1553 			[EXECMEM_KPROBES] = {
1554 				.start	= VMALLOC_START,
1555 				.end	= VMALLOC_END,
1556 				.pgprot	= PAGE_KERNEL_READ_EXEC,
1557 				.alignment = 1,
1558 			},
1559 			[EXECMEM_BPF] = {
1560 				.start	= BPF_JIT_REGION_START,
1561 				.end	= BPF_JIT_REGION_END,
1562 				.pgprot	= PAGE_KERNEL,
1563 				.alignment = PAGE_SIZE,
1564 			},
1565 		},
1566 	};
1567 
1568 	return &execmem_info;
1569 }
1570 #endif /* CONFIG_MMU */
1571 #endif /* CONFIG_EXECMEM */
1572 
1573 #ifdef CONFIG_MEMORY_HOTPLUG
1574 static void __meminit free_pte_table(pte_t *pte_start, pmd_t *pmd)
1575 {
1576 	struct page *page = pmd_page(*pmd);
1577 	struct ptdesc *ptdesc = page_ptdesc(page);
1578 	pte_t *pte;
1579 	int i;
1580 
1581 	for (i = 0; i < PTRS_PER_PTE; i++) {
1582 		pte = pte_start + i;
1583 		if (!pte_none(*pte))
1584 			return;
1585 	}
1586 
1587 	pagetable_dtor(ptdesc);
1588 	if (PageReserved(page))
1589 		free_reserved_page(page);
1590 	else
1591 		pagetable_free(ptdesc);
1592 	pmd_clear(pmd);
1593 }
1594 
1595 static void __meminit free_pmd_table(pmd_t *pmd_start, pud_t *pud, bool is_vmemmap)
1596 {
1597 	struct page *page = pud_page(*pud);
1598 	struct ptdesc *ptdesc = page_ptdesc(page);
1599 	pmd_t *pmd;
1600 	int i;
1601 
1602 	for (i = 0; i < PTRS_PER_PMD; i++) {
1603 		pmd = pmd_start + i;
1604 		if (!pmd_none(*pmd))
1605 			return;
1606 	}
1607 
1608 	if (!is_vmemmap)
1609 		pagetable_dtor(ptdesc);
1610 	if (PageReserved(page))
1611 		free_reserved_page(page);
1612 	else
1613 		pagetable_free(ptdesc);
1614 	pud_clear(pud);
1615 }
1616 
1617 static void __meminit free_pud_table(pud_t *pud_start, p4d_t *p4d)
1618 {
1619 	struct page *page = p4d_page(*p4d);
1620 	pud_t *pud;
1621 	int i;
1622 
1623 	for (i = 0; i < PTRS_PER_PUD; i++) {
1624 		pud = pud_start + i;
1625 		if (!pud_none(*pud))
1626 			return;
1627 	}
1628 
1629 	if (PageReserved(page))
1630 		free_reserved_page(page);
1631 	else
1632 		free_pages((unsigned long)page_address(page), 0);
1633 	p4d_clear(p4d);
1634 }
1635 
1636 static void __meminit free_vmemmap_storage(struct page *page, size_t size,
1637 					   struct vmem_altmap *altmap)
1638 {
1639 	int order = get_order(size);
1640 
1641 	if (altmap) {
1642 		vmem_altmap_free(altmap, size >> PAGE_SHIFT);
1643 		return;
1644 	}
1645 
1646 	if (PageReserved(page)) {
1647 		unsigned int nr_pages = 1 << order;
1648 
1649 		while (nr_pages--)
1650 			free_reserved_page(page++);
1651 		return;
1652 	}
1653 
1654 	free_pages((unsigned long)page_address(page), order);
1655 }
1656 
1657 static void __meminit remove_pte_mapping(pte_t *pte_base, unsigned long addr, unsigned long end,
1658 					 bool is_vmemmap, struct vmem_altmap *altmap)
1659 {
1660 	unsigned long next;
1661 	pte_t *ptep, pte;
1662 
1663 	for (; addr < end; addr = next) {
1664 		next = (addr + PAGE_SIZE) & PAGE_MASK;
1665 		if (next > end)
1666 			next = end;
1667 
1668 		ptep = pte_base + pte_index(addr);
1669 		pte = ptep_get(ptep);
1670 		if (!pte_present(*ptep))
1671 			continue;
1672 
1673 		pte_clear(&init_mm, addr, ptep);
1674 		if (is_vmemmap)
1675 			free_vmemmap_storage(pte_page(pte), PAGE_SIZE, altmap);
1676 	}
1677 }
1678 
1679 static void __meminit remove_pmd_mapping(pmd_t *pmd_base, unsigned long addr, unsigned long end,
1680 					 bool is_vmemmap, struct vmem_altmap *altmap)
1681 {
1682 	unsigned long next;
1683 	pte_t *pte_base;
1684 	pmd_t *pmdp, pmd;
1685 
1686 	for (; addr < end; addr = next) {
1687 		next = pmd_addr_end(addr, end);
1688 		pmdp = pmd_base + pmd_index(addr);
1689 		pmd = pmdp_get(pmdp);
1690 		if (!pmd_present(pmd))
1691 			continue;
1692 
1693 		if (pmd_leaf(pmd)) {
1694 			pmd_clear(pmdp);
1695 			if (is_vmemmap)
1696 				free_vmemmap_storage(pmd_page(pmd), PMD_SIZE, altmap);
1697 			continue;
1698 		}
1699 
1700 		pte_base = (pte_t *)pmd_page_vaddr(*pmdp);
1701 		remove_pte_mapping(pte_base, addr, next, is_vmemmap, altmap);
1702 		free_pte_table(pte_base, pmdp);
1703 	}
1704 }
1705 
1706 static void __meminit remove_pud_mapping(pud_t *pud_base, unsigned long addr, unsigned long end,
1707 					 bool is_vmemmap, struct vmem_altmap *altmap)
1708 {
1709 	unsigned long next;
1710 	pud_t *pudp, pud;
1711 	pmd_t *pmd_base;
1712 
1713 	for (; addr < end; addr = next) {
1714 		next = pud_addr_end(addr, end);
1715 		pudp = pud_base + pud_index(addr);
1716 		pud = pudp_get(pudp);
1717 		if (!pud_present(pud))
1718 			continue;
1719 
1720 		if (pud_leaf(pud)) {
1721 			if (pgtable_l4_enabled) {
1722 				pud_clear(pudp);
1723 				if (is_vmemmap)
1724 					free_vmemmap_storage(pud_page(pud), PUD_SIZE, altmap);
1725 			}
1726 			continue;
1727 		}
1728 
1729 		pmd_base = pmd_offset(pudp, 0);
1730 		remove_pmd_mapping(pmd_base, addr, next, is_vmemmap, altmap);
1731 
1732 		if (pgtable_l4_enabled)
1733 			free_pmd_table(pmd_base, pudp, is_vmemmap);
1734 	}
1735 }
1736 
1737 static void __meminit remove_p4d_mapping(p4d_t *p4d_base, unsigned long addr, unsigned long end,
1738 					 bool is_vmemmap, struct vmem_altmap *altmap)
1739 {
1740 	unsigned long next;
1741 	p4d_t *p4dp, p4d;
1742 	pud_t *pud_base;
1743 
1744 	for (; addr < end; addr = next) {
1745 		next = p4d_addr_end(addr, end);
1746 		p4dp = p4d_base + p4d_index(addr);
1747 		p4d = p4dp_get(p4dp);
1748 		if (!p4d_present(p4d))
1749 			continue;
1750 
1751 		if (p4d_leaf(p4d)) {
1752 			if (pgtable_l5_enabled) {
1753 				p4d_clear(p4dp);
1754 				if (is_vmemmap)
1755 					free_vmemmap_storage(p4d_page(p4d), P4D_SIZE, altmap);
1756 			}
1757 			continue;
1758 		}
1759 
1760 		pud_base = pud_offset(p4dp, 0);
1761 		remove_pud_mapping(pud_base, addr, next, is_vmemmap, altmap);
1762 
1763 		if (pgtable_l5_enabled)
1764 			free_pud_table(pud_base, p4dp);
1765 	}
1766 }
1767 
1768 static void __meminit remove_pgd_mapping(unsigned long va, unsigned long end, bool is_vmemmap,
1769 					 struct vmem_altmap *altmap)
1770 {
1771 	unsigned long addr, next;
1772 	p4d_t *p4d_base;
1773 	pgd_t *pgd;
1774 
1775 	for (addr = va; addr < end; addr = next) {
1776 		next = pgd_addr_end(addr, end);
1777 		pgd = pgd_offset_k(addr);
1778 
1779 		if (!pgd_present(*pgd))
1780 			continue;
1781 
1782 		if (pgd_leaf(*pgd))
1783 			continue;
1784 
1785 		p4d_base = p4d_offset(pgd, 0);
1786 		remove_p4d_mapping(p4d_base, addr, next, is_vmemmap, altmap);
1787 	}
1788 
1789 	flush_tlb_all();
1790 }
1791 
1792 static void __meminit remove_linear_mapping(phys_addr_t start, u64 size)
1793 {
1794 	unsigned long va = (unsigned long)__va(start);
1795 	unsigned long end = (unsigned long)__va(start + size);
1796 
1797 	remove_pgd_mapping(va, end, false, NULL);
1798 }
1799 
1800 struct range arch_get_mappable_range(void)
1801 {
1802 	struct range mhp_range;
1803 
1804 	mhp_range.start = __pa(PAGE_OFFSET);
1805 	mhp_range.end = __pa(PAGE_END - 1);
1806 	return mhp_range;
1807 }
1808 
1809 int __ref arch_add_memory(int nid, u64 start, u64 size, struct mhp_params *params)
1810 {
1811 	int ret = 0;
1812 
1813 	create_linear_mapping_range(start, start + size, 0, &params->pgprot);
1814 	ret = __add_pages(nid, start >> PAGE_SHIFT, size >> PAGE_SHIFT, params);
1815 	if (ret) {
1816 		remove_linear_mapping(start, size);
1817 		goto out;
1818 	}
1819 
1820 	max_pfn = PFN_UP(start + size);
1821 	max_low_pfn = max_pfn;
1822 
1823  out:
1824 	flush_tlb_all();
1825 	return ret;
1826 }
1827 
1828 void __ref arch_remove_memory(u64 start, u64 size, struct vmem_altmap *altmap)
1829 {
1830 	__remove_pages(start >> PAGE_SHIFT, size >> PAGE_SHIFT, altmap);
1831 	remove_linear_mapping(start, size);
1832 	flush_tlb_all();
1833 }
1834 
1835 void __ref vmemmap_free(unsigned long start, unsigned long end, struct vmem_altmap *altmap)
1836 {
1837 	remove_pgd_mapping(start, end, true, altmap);
1838 }
1839 #endif /* CONFIG_MEMORY_HOTPLUG */
1840