mmu.c 21.4 KB
Newer Older
C
Catalin Marinas 已提交
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
/*
 * Based on arch/arm/mm/mmu.c
 *
 * Copyright (C) 1995-2005 Russell King
 * Copyright (C) 2012 ARM Ltd.
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License version 2 as
 * published by the Free Software Foundation.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
 */

20
#include <linux/cache.h>
C
Catalin Marinas 已提交
21 22 23 24
#include <linux/export.h>
#include <linux/kernel.h>
#include <linux/errno.h>
#include <linux/init.h>
25
#include <linux/libfdt.h>
C
Catalin Marinas 已提交
26 27 28 29
#include <linux/mman.h>
#include <linux/nodemask.h>
#include <linux/memblock.h>
#include <linux/fs.h>
30
#include <linux/io.h>
31
#include <linux/mm.h>
C
Catalin Marinas 已提交
32

33
#include <asm/barrier.h>
C
Catalin Marinas 已提交
34
#include <asm/cputype.h>
35
#include <asm/fixmap.h>
36
#include <asm/kasan.h>
37
#include <asm/kernel-pgtable.h>
C
Catalin Marinas 已提交
38 39 40 41
#include <asm/sections.h>
#include <asm/setup.h>
#include <asm/sizes.h>
#include <asm/tlb.h>
42
#include <asm/memblock.h>
C
Catalin Marinas 已提交
43
#include <asm/mmu_context.h>
44
#include <asm/ptdump.h>
C
Catalin Marinas 已提交
45

46 47
u64 idmap_t0sz = TCR_T0SZ(VA_BITS);

48
u64 kimage_voffset __ro_after_init;
49 50
EXPORT_SYMBOL(kimage_voffset);

C
Catalin Marinas 已提交
51 52 53 54
/*
 * Empty_zero_page is a special page that is used for zero-initialized data
 * and COW.
 */
55
unsigned long empty_zero_page[PAGE_SIZE / sizeof(unsigned long)] __page_aligned_bss;
C
Catalin Marinas 已提交
56 57
EXPORT_SYMBOL(empty_zero_page);

58 59 60 61
static pte_t bm_pte[PTRS_PER_PTE] __page_aligned_bss;
static pmd_t bm_pmd[PTRS_PER_PMD] __page_aligned_bss __maybe_unused;
static pud_t bm_pud[PTRS_PER_PUD] __page_aligned_bss __maybe_unused;

C
Catalin Marinas 已提交
62 63 64 65 66 67 68 69 70 71 72
pgprot_t phys_mem_access_prot(struct file *file, unsigned long pfn,
			      unsigned long size, pgprot_t vma_prot)
{
	if (!pfn_valid(pfn))
		return pgprot_noncached(vma_prot);
	else if (file->f_flags & O_SYNC)
		return pgprot_writecombine(vma_prot);
	return vma_prot;
}
EXPORT_SYMBOL(phys_mem_access_prot);

73
static phys_addr_t __init early_pgtable_alloc(void)
C
Catalin Marinas 已提交
74
{
75 76 77
	phys_addr_t phys;
	void *ptr;

78
	phys = memblock_alloc(PAGE_SIZE, PAGE_SIZE);
79 80 81 82 83 84 85 86

	/*
	 * The FIX_{PGD,PUD,PMD} slots may be in active use, but the FIX_PTE
	 * slot will be free, so we can (ab)use the FIX_PTE slot to initialise
	 * any level of table.
	 */
	ptr = pte_set_fixmap(phys);

87 88
	memset(ptr, 0, PAGE_SIZE);

89 90 91 92 93 94 95
	/*
	 * Implicit barriers also ensure the zeroed page is visible to the page
	 * table walker
	 */
	pte_clear_fixmap();

	return phys;
C
Catalin Marinas 已提交
96 97
}

98 99 100 101 102 103 104 105 106 107 108
static bool pgattr_change_is_safe(u64 old, u64 new)
{
	/*
	 * The following mapping attributes may be updated in live
	 * kernel mappings without the need for break-before-make.
	 */
	static const pteval_t mask = PTE_PXN | PTE_RDONLY | PTE_WRITE;

	return old  == 0 || new  == 0 || ((old ^ new) & ~mask) == 0;
}

109
static void alloc_init_pte(pmd_t *pmd, unsigned long addr,
110
				  unsigned long end, unsigned long pfn,
111
				  pgprot_t prot,
112 113
				  phys_addr_t (*pgtable_alloc)(void),
				  bool page_mappings_only)
C
Catalin Marinas 已提交
114
{
115
	pgprot_t __prot = prot;
C
Catalin Marinas 已提交
116 117
	pte_t *pte;

118 119
	BUG_ON(pmd_sect(*pmd));
	if (pmd_none(*pmd)) {
120 121 122
		phys_addr_t pte_phys;
		BUG_ON(!pgtable_alloc);
		pte_phys = pgtable_alloc();
123 124 125
		pte = pte_set_fixmap(pte_phys);
		__pmd_populate(pmd, pte_phys, PMD_TYPE_TABLE);
		pte_clear_fixmap();
C
Catalin Marinas 已提交
126
	}
127
	BUG_ON(pmd_bad(*pmd));
C
Catalin Marinas 已提交
128

129
	pte = pte_set_fixmap_offset(pmd, addr);
C
Catalin Marinas 已提交
130
	do {
131 132
		pte_t old_pte = *pte;

133 134 135 136 137 138 139 140 141 142 143 144
		/*
		 * Set the contiguous bit for the subsequent group of PTEs if
		 * its size and alignment are appropriate.
		 */
		if (((addr | PFN_PHYS(pfn)) & ~CONT_PTE_MASK) == 0) {
			if (end - addr >= CONT_PTE_SIZE && !page_mappings_only)
				__prot = __pgprot(pgprot_val(prot) | PTE_CONT);
			else
				__prot = prot;
		}

		set_pte(pte, pfn_pte(pfn, __prot));
145
		pfn++;
146 147 148 149 150 151 152

		/*
		 * After the PTE entry has been populated once, we
		 * only allow updates to the permission attributes.
		 */
		BUG_ON(!pgattr_change_is_safe(pte_val(old_pte), pte_val(*pte)));

153
	} while (pte++, addr += PAGE_SIZE, addr != end);
154 155

	pte_clear_fixmap();
C
Catalin Marinas 已提交
156 157
}

158
static void alloc_init_pmd(pud_t *pud, unsigned long addr, unsigned long end,
159
				  phys_addr_t phys, pgprot_t prot,
160
				  phys_addr_t (*pgtable_alloc)(void),
161
				  bool page_mappings_only)
C
Catalin Marinas 已提交
162
{
163
	pgprot_t __prot = prot;
C
Catalin Marinas 已提交
164 165 166 167 168 169
	pmd_t *pmd;
	unsigned long next;

	/*
	 * Check for initial section mappings in the pgd/pud and remove them.
	 */
170 171
	BUG_ON(pud_sect(*pud));
	if (pud_none(*pud)) {
172 173 174
		phys_addr_t pmd_phys;
		BUG_ON(!pgtable_alloc);
		pmd_phys = pgtable_alloc();
175 176 177
		pmd = pmd_set_fixmap(pmd_phys);
		__pud_populate(pud, pmd_phys, PUD_TYPE_TABLE);
		pmd_clear_fixmap();
C
Catalin Marinas 已提交
178
	}
179
	BUG_ON(pud_bad(*pud));
C
Catalin Marinas 已提交
180

181
	pmd = pmd_set_fixmap_offset(pud, addr);
C
Catalin Marinas 已提交
182
	do {
183 184
		pmd_t old_pmd = *pmd;

C
Catalin Marinas 已提交
185
		next = pmd_addr_end(addr, end);
186

C
Catalin Marinas 已提交
187
		/* try section mapping first */
188
		if (((addr | next | phys) & ~SECTION_MASK) == 0 &&
189
		      !page_mappings_only) {
190 191 192 193 194 195 196 197 198 199 200 201
			/*
			 * Set the contiguous bit for the subsequent group of
			 * PMDs if its size and alignment are appropriate.
			 */
			if (((addr | phys) & ~CONT_PMD_MASK) == 0) {
				if (end - addr >= CONT_PMD_SIZE)
					__prot = __pgprot(pgprot_val(prot) |
							  PTE_CONT);
				else
					__prot = prot;
			}
			pmd_set_huge(pmd, phys, __prot);
202

203
			/*
204 205
			 * After the PMD entry has been populated once, we
			 * only allow updates to the permission attributes.
206
			 */
207 208
			BUG_ON(!pgattr_change_is_safe(pmd_val(old_pmd),
						      pmd_val(*pmd)));
209
		} else {
210
			alloc_init_pte(pmd, addr, next, __phys_to_pfn(phys),
211 212
				       prot, pgtable_alloc,
				       page_mappings_only);
213 214 215

			BUG_ON(pmd_val(old_pmd) != 0 &&
			       pmd_val(old_pmd) != pmd_val(*pmd));
216
		}
C
Catalin Marinas 已提交
217 218
		phys += next - addr;
	} while (pmd++, addr = next, addr != end);
219 220

	pmd_clear_fixmap();
C
Catalin Marinas 已提交
221 222
}

223 224 225 226 227 228 229 230 231 232 233 234
static inline bool use_1G_block(unsigned long addr, unsigned long next,
			unsigned long phys)
{
	if (PAGE_SHIFT != 12)
		return false;

	if (((addr | next | phys) & ~PUD_MASK) != 0)
		return false;

	return true;
}

235
static void alloc_init_pud(pgd_t *pgd, unsigned long addr, unsigned long end,
236
				  phys_addr_t phys, pgprot_t prot,
237
				  phys_addr_t (*pgtable_alloc)(void),
238
				  bool page_mappings_only)
C
Catalin Marinas 已提交
239
{
240
	pud_t *pud;
C
Catalin Marinas 已提交
241 242
	unsigned long next;

243
	if (pgd_none(*pgd)) {
244 245 246
		phys_addr_t pud_phys;
		BUG_ON(!pgtable_alloc);
		pud_phys = pgtable_alloc();
247
		__pgd_populate(pgd, pud_phys, PUD_TYPE_TABLE);
248 249 250
	}
	BUG_ON(pgd_bad(*pgd));

251
	pud = pud_set_fixmap_offset(pgd, addr);
C
Catalin Marinas 已提交
252
	do {
253 254
		pud_t old_pud = *pud;

C
Catalin Marinas 已提交
255
		next = pud_addr_end(addr, end);
256 257 258 259

		/*
		 * For 4K granule only, attempt to put down a 1GB block
		 */
260
		if (use_1G_block(addr, next, phys) && !page_mappings_only) {
261
			pud_set_huge(pud, phys, prot);
262 263

			/*
264 265
			 * After the PUD entry has been populated once, we
			 * only allow updates to the permission attributes.
266
			 */
267 268
			BUG_ON(!pgattr_change_is_safe(pud_val(old_pud),
						      pud_val(*pud)));
269
		} else {
270
			alloc_init_pmd(pud, addr, next, phys, prot,
271
				       pgtable_alloc, page_mappings_only);
272 273 274

			BUG_ON(pud_val(old_pud) != 0 &&
			       pud_val(old_pud) != pud_val(*pud));
275
		}
C
Catalin Marinas 已提交
276 277
		phys += next - addr;
	} while (pud++, addr = next, addr != end);
278 279

	pud_clear_fixmap();
C
Catalin Marinas 已提交
280 281
}

282 283 284 285
static void __create_pgd_mapping(pgd_t *pgdir, phys_addr_t phys,
				 unsigned long virt, phys_addr_t size,
				 pgprot_t prot,
				 phys_addr_t (*pgtable_alloc)(void),
286
				 bool page_mappings_only)
C
Catalin Marinas 已提交
287 288
{
	unsigned long addr, length, end, next;
289
	pgd_t *pgd = pgd_offset_raw(pgdir, virt);
C
Catalin Marinas 已提交
290

291 292 293 294 295 296 297
	/*
	 * If the virtual and physical address don't have the same offset
	 * within a page, we cannot map the region as the caller expects.
	 */
	if (WARN_ON((phys ^ virt) & ~PAGE_MASK))
		return;

298
	phys &= PAGE_MASK;
C
Catalin Marinas 已提交
299 300 301 302 303 304
	addr = virt & PAGE_MASK;
	length = PAGE_ALIGN(size + (virt & ~PAGE_MASK));

	end = addr + length;
	do {
		next = pgd_addr_end(addr, end);
305
		alloc_init_pud(pgd, addr, next, phys, prot, pgtable_alloc,
306
			       page_mappings_only);
C
Catalin Marinas 已提交
307 308 309 310
		phys += next - addr;
	} while (pgd++, addr = next, addr != end);
}

311
static phys_addr_t pgd_pgtable_alloc(void)
312
{
313
	void *ptr = (void *)__get_free_page(PGALLOC_GFP);
314 315
	if (!ptr || !pgtable_page_ctor(virt_to_page(ptr)))
		BUG();
316 317 318

	/* Ensure the zeroed page is visible to the page table walker */
	dsb(ishst);
319
	return __pa(ptr);
320 321
}

322 323 324 325 326 327
/*
 * This function can only be used to modify existing table entries,
 * without allocating new levels of table. Note that this permits the
 * creation of new section or page entries.
 */
static void __init create_mapping_noalloc(phys_addr_t phys, unsigned long virt,
328
				  phys_addr_t size, pgprot_t prot)
329 330 331 332 333 334
{
	if (virt < VMALLOC_START) {
		pr_warn("BUG: not creating mapping for %pa at 0x%016lx - outside kernel range\n",
			&phys, virt);
		return;
	}
335
	__create_pgd_mapping(init_mm.pgd, phys, virt, size, prot, NULL, false);
336 337
}

338 339
void __init create_pgd_mapping(struct mm_struct *mm, phys_addr_t phys,
			       unsigned long virt, phys_addr_t size,
340
			       pgprot_t prot, bool page_mappings_only)
341
{
342 343
	BUG_ON(mm == &init_mm);

344
	__create_pgd_mapping(mm->pgd, phys, virt, size, prot,
345
			     pgd_pgtable_alloc, page_mappings_only);
346 347
}

348 349 350 351 352 353 354 355 356
static void create_mapping_late(phys_addr_t phys, unsigned long virt,
				  phys_addr_t size, pgprot_t prot)
{
	if (virt < VMALLOC_START) {
		pr_warn("BUG: not creating mapping for %pa at 0x%016lx - outside kernel range\n",
			&phys, virt);
		return;
	}

357
	__create_pgd_mapping(init_mm.pgd, phys, virt, size, prot,
358
			     NULL, debug_pagealloc_enabled());
359 360
}

361
static void __init __map_memblock(pgd_t *pgd, phys_addr_t start, phys_addr_t end)
362
{
363 364
	phys_addr_t kernel_start = __pa_symbol(_text);
	phys_addr_t kernel_end = __pa_symbol(__init_begin);
365

366
	/*
367 368
	 * Take care not to create a writable alias for the
	 * read-only text and rodata sections of the kernel image.
369
	 */
370

371
	/* No overlap with the kernel text/rodata */
372 373 374
	if (end < kernel_start || start >= kernel_end) {
		__create_pgd_mapping(pgd, start, __phys_to_virt(start),
				     end - start, PAGE_KERNEL,
375
				     early_pgtable_alloc,
376
				     debug_pagealloc_enabled());
377
		return;
378 379
	}

380
	/*
381
	 * This block overlaps the kernel text/rodata mappings.
382
	 * Map the portion(s) which don't overlap.
383 384 385 386 387
	 */
	if (start < kernel_start)
		__create_pgd_mapping(pgd, start,
				     __phys_to_virt(start),
				     kernel_start - start, PAGE_KERNEL,
388
				     early_pgtable_alloc,
389
				     debug_pagealloc_enabled());
390 391 392 393
	if (kernel_end < end)
		__create_pgd_mapping(pgd, kernel_end,
				     __phys_to_virt(kernel_end),
				     end - kernel_end, PAGE_KERNEL,
394
				     early_pgtable_alloc,
395
				     debug_pagealloc_enabled());
396 397

	/*
398
	 * Map the linear alias of the [_text, __init_begin) interval as
399 400 401 402 403 404
	 * read-only/non-executable. This makes the contents of the
	 * region accessible to subsystems such as hibernate, but
	 * protects it from inadvertent modification or execution.
	 */
	__create_pgd_mapping(pgd, kernel_start, __phys_to_virt(kernel_start),
			     kernel_end - kernel_start, PAGE_KERNEL_RO,
405
			     early_pgtable_alloc, debug_pagealloc_enabled());
406 407
}

408
static void __init map_mem(pgd_t *pgd)
C
Catalin Marinas 已提交
409 410
{
	struct memblock_region *reg;
411

C
Catalin Marinas 已提交
412 413 414 415 416 417 418
	/* map all the memory banks */
	for_each_memblock(memory, reg) {
		phys_addr_t start = reg->base;
		phys_addr_t end = start + reg->size;

		if (start >= end)
			break;
419 420
		if (memblock_is_nomap(reg))
			continue;
C
Catalin Marinas 已提交
421

422
		__map_memblock(pgd, start, end);
C
Catalin Marinas 已提交
423 424 425
	}
}

426 427
void mark_rodata_ro(void)
{
J
Jeremy Linton 已提交
428
	unsigned long section_size;
429

430
	section_size = (unsigned long)_etext - (unsigned long)_text;
431
	create_mapping_late(__pa_symbol(_text), (unsigned long)_text,
J
Jeremy Linton 已提交
432 433
			    section_size, PAGE_KERNEL_ROX);
	/*
434 435
	 * mark .rodata as read only. Use __init_begin rather than __end_rodata
	 * to cover NOTES and EXCEPTION_TABLE.
J
Jeremy Linton 已提交
436
	 */
437
	section_size = (unsigned long)__init_begin - (unsigned long)__start_rodata;
438
	create_mapping_late(__pa_symbol(__start_rodata), (unsigned long)__start_rodata,
J
Jeremy Linton 已提交
439
			    section_size, PAGE_KERNEL_RO);
440 441 442

	/* flush the TLBs after updating live kernel mappings */
	flush_tlb_all();
443 444

	debug_checkwx();
445 446
}

447 448
static void __init map_kernel_segment(pgd_t *pgd, void *va_start, void *va_end,
				      pgprot_t prot, struct vm_struct *vma)
449
{
450
	phys_addr_t pa_start = __pa_symbol(va_start);
451 452 453 454 455 456
	unsigned long size = va_end - va_start;

	BUG_ON(!PAGE_ALIGNED(pa_start));
	BUG_ON(!PAGE_ALIGNED(size));

	__create_pgd_mapping(pgd, pa_start, (unsigned long)va_start, size, prot,
457
			     early_pgtable_alloc, debug_pagealloc_enabled());
458 459 460 461 462 463 464 465

	vma->addr	= va_start;
	vma->phys_addr	= pa_start;
	vma->size	= size;
	vma->flags	= VM_MAP;
	vma->caller	= __builtin_return_address(0);

	vm_area_add_early(vma);
466 467 468 469 470 471 472
}

/*
 * Create fine-grained mappings for the kernel.
 */
static void __init map_kernel(pgd_t *pgd)
{
J
Jeremy Linton 已提交
473
	static struct vm_struct vmlinux_text, vmlinux_rodata, vmlinux_init, vmlinux_data;
474

475 476
	map_kernel_segment(pgd, _text, _etext, PAGE_KERNEL_EXEC, &vmlinux_text);
	map_kernel_segment(pgd, __start_rodata, __init_begin, PAGE_KERNEL, &vmlinux_rodata);
477 478 479
	map_kernel_segment(pgd, __init_begin, __init_end, PAGE_KERNEL_EXEC,
			   &vmlinux_init);
	map_kernel_segment(pgd, _data, _end, PAGE_KERNEL, &vmlinux_data);
480

481 482 483 484 485 486 487 488 489 490 491 492 493 494 495 496 497
	if (!pgd_val(*pgd_offset_raw(pgd, FIXADDR_START))) {
		/*
		 * The fixmap falls in a separate pgd to the kernel, and doesn't
		 * live in the carveout for the swapper_pg_dir. We can simply
		 * re-use the existing dir for the fixmap.
		 */
		set_pgd(pgd_offset_raw(pgd, FIXADDR_START),
			*pgd_offset_k(FIXADDR_START));
	} else if (CONFIG_PGTABLE_LEVELS > 3) {
		/*
		 * The fixmap shares its top level pgd entry with the kernel
		 * mapping. This can really only occur when we are running
		 * with 16k/4 levels, so we can simply reuse the pud level
		 * entry instead.
		 */
		BUG_ON(!IS_ENABLED(CONFIG_ARM64_16K_PAGES));
		set_pud(pud_set_fixmap_offset(pgd, FIXADDR_START),
498
			__pud(__pa_symbol(bm_pmd) | PUD_TYPE_TABLE));
499 500 501 502
		pud_clear_fixmap();
	} else {
		BUG();
	}
503 504 505 506

	kasan_copy_shadow(pgd);
}

C
Catalin Marinas 已提交
507 508 509 510 511 512
/*
 * paging_init() sets up the page tables, initialises the zone memory
 * maps and sets up the zero page.
 */
void __init paging_init(void)
{
513 514 515 516 517 518 519 520 521 522 523 524 525 526 527
	phys_addr_t pgd_phys = early_pgtable_alloc();
	pgd_t *pgd = pgd_set_fixmap(pgd_phys);

	map_kernel(pgd);
	map_mem(pgd);

	/*
	 * We want to reuse the original swapper_pg_dir so we don't have to
	 * communicate the new address to non-coherent secondaries in
	 * secondary_entry, and so cpu_switch_mm can generate the address with
	 * adrp+add rather than a load from some global variable.
	 *
	 * To do this we need to go via a temporary pgd.
	 */
	cpu_replace_ttbr1(__va(pgd_phys));
528
	memcpy(swapper_pg_dir, pgd, PGD_SIZE);
529
	cpu_replace_ttbr1(lm_alias(swapper_pg_dir));
530 531 532 533 534 535 536 537

	pgd_clear_fixmap();
	memblock_free(pgd_phys, PAGE_SIZE);

	/*
	 * We only reuse the PGD from the swapper_pg_dir, not the pud + pmd
	 * allocated with it.
	 */
538
	memblock_free(__pa_symbol(swapper_pg_dir) + PAGE_SIZE,
539
		      SWAPPER_DIR_SIZE - PAGE_SIZE);
C
Catalin Marinas 已提交
540 541 542 543 544 545 546 547 548 549 550 551 552 553 554 555 556 557 558 559 560 561 562
}

/*
 * Check whether a kernel address is valid (derived from arch/x86/).
 */
int kern_addr_valid(unsigned long addr)
{
	pgd_t *pgd;
	pud_t *pud;
	pmd_t *pmd;
	pte_t *pte;

	if ((((long)addr) >> VA_BITS) != -1UL)
		return 0;

	pgd = pgd_offset_k(addr);
	if (pgd_none(*pgd))
		return 0;

	pud = pud_offset(pgd, addr);
	if (pud_none(*pud))
		return 0;

563 564 565
	if (pud_sect(*pud))
		return pfn_valid(pud_pfn(*pud));

C
Catalin Marinas 已提交
566 567 568 569
	pmd = pmd_offset(pud, addr);
	if (pmd_none(*pmd))
		return 0;

570 571 572
	if (pmd_sect(*pmd))
		return pfn_valid(pmd_pfn(*pmd));

C
Catalin Marinas 已提交
573 574 575 576 577 578 579
	pte = pte_offset_kernel(pmd, addr);
	if (pte_none(*pte))
		return 0;

	return pfn_valid(pte_pfn(*pte));
}
#ifdef CONFIG_SPARSEMEM_VMEMMAP
580
#if !ARM64_SWAPPER_USES_SECTION_MAPS
581
int __meminit vmemmap_populate(unsigned long start, unsigned long end, int node)
C
Catalin Marinas 已提交
582
{
583
	return vmemmap_populate_basepages(start, end, node);
C
Catalin Marinas 已提交
584
}
585
#else	/* !ARM64_SWAPPER_USES_SECTION_MAPS */
586
int __meminit vmemmap_populate(unsigned long start, unsigned long end, int node)
C
Catalin Marinas 已提交
587
{
588
	unsigned long addr = start;
C
Catalin Marinas 已提交
589 590 591 592 593 594 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612
	unsigned long next;
	pgd_t *pgd;
	pud_t *pud;
	pmd_t *pmd;

	do {
		next = pmd_addr_end(addr, end);

		pgd = vmemmap_pgd_populate(addr, node);
		if (!pgd)
			return -ENOMEM;

		pud = vmemmap_pud_populate(pgd, addr, node);
		if (!pud)
			return -ENOMEM;

		pmd = pmd_offset(pud, addr);
		if (pmd_none(*pmd)) {
			void *p = NULL;

			p = vmemmap_alloc_block_buf(PMD_SIZE, node);
			if (!p)
				return -ENOMEM;

613
			set_pmd(pmd, __pmd(__pa(p) | PROT_SECT_NORMAL));
C
Catalin Marinas 已提交
614 615 616 617 618 619 620
		} else
			vmemmap_verify((pte_t *)pmd, node, addr, next);
	} while (addr = next, addr != end);

	return 0;
}
#endif	/* CONFIG_ARM64_64K_PAGES */
621
void vmemmap_free(unsigned long start, unsigned long end)
622 623
{
}
C
Catalin Marinas 已提交
624
#endif	/* CONFIG_SPARSEMEM_VMEMMAP */
625 626 627 628 629 630 631

static inline pud_t * fixmap_pud(unsigned long addr)
{
	pgd_t *pgd = pgd_offset_k(addr);

	BUG_ON(pgd_none(*pgd) || pgd_bad(*pgd));

632
	return pud_offset_kimg(pgd, addr);
633 634 635 636 637 638 639 640
}

static inline pmd_t * fixmap_pmd(unsigned long addr)
{
	pud_t *pud = fixmap_pud(addr);

	BUG_ON(pud_none(*pud) || pud_bad(*pud));

641
	return pmd_offset_kimg(pud, addr);
642 643 644 645
}

static inline pte_t * fixmap_pte(unsigned long addr)
{
646
	return &bm_pte[pte_index(addr)];
647 648
}

649 650 651 652 653 654
/*
 * The p*d_populate functions call virt_to_phys implicitly so they can't be used
 * directly on kernel symbols (bm_p*d). This function is called too early to use
 * lm_alias so __p*d_populate functions must be used to populate with the
 * physical address from __pa_symbol.
 */
655 656 657 658 659 660 661 662
void __init early_fixmap_init(void)
{
	pgd_t *pgd;
	pud_t *pud;
	pmd_t *pmd;
	unsigned long addr = FIXADDR_START;

	pgd = pgd_offset_k(addr);
663
	if (CONFIG_PGTABLE_LEVELS > 3 &&
664
	    !(pgd_none(*pgd) || pgd_page_paddr(*pgd) == __pa_symbol(bm_pud))) {
665 666 667 668 669 670 671 672
		/*
		 * We only end up here if the kernel mapping and the fixmap
		 * share the top level pgd entry, which should only happen on
		 * 16k/4 levels configurations.
		 */
		BUG_ON(!IS_ENABLED(CONFIG_ARM64_16K_PAGES));
		pud = pud_offset_kimg(pgd, addr);
	} else {
673 674
		if (pgd_none(*pgd))
			__pgd_populate(pgd, __pa_symbol(bm_pud), PUD_TYPE_TABLE);
675 676
		pud = fixmap_pud(addr);
	}
677 678
	if (pud_none(*pud))
		__pud_populate(pud, __pa_symbol(bm_pmd), PMD_TYPE_TABLE);
679
	pmd = fixmap_pmd(addr);
680
	__pmd_populate(pmd, __pa_symbol(bm_pte), PMD_TYPE_TABLE);
681 682 683

	/*
	 * The boot-ioremap range spans multiple pmds, for which
684
	 * we are not prepared:
685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710
	 */
	BUILD_BUG_ON((__fix_to_virt(FIX_BTMAP_BEGIN) >> PMD_SHIFT)
		     != (__fix_to_virt(FIX_BTMAP_END) >> PMD_SHIFT));

	if ((pmd != fixmap_pmd(fix_to_virt(FIX_BTMAP_BEGIN)))
	     || pmd != fixmap_pmd(fix_to_virt(FIX_BTMAP_END))) {
		WARN_ON(1);
		pr_warn("pmd %p != %p, %p\n",
			pmd, fixmap_pmd(fix_to_virt(FIX_BTMAP_BEGIN)),
			fixmap_pmd(fix_to_virt(FIX_BTMAP_END)));
		pr_warn("fix_to_virt(FIX_BTMAP_BEGIN): %08lx\n",
			fix_to_virt(FIX_BTMAP_BEGIN));
		pr_warn("fix_to_virt(FIX_BTMAP_END):   %08lx\n",
			fix_to_virt(FIX_BTMAP_END));

		pr_warn("FIX_BTMAP_END:       %d\n", FIX_BTMAP_END);
		pr_warn("FIX_BTMAP_BEGIN:     %d\n", FIX_BTMAP_BEGIN);
	}
}

void __set_fixmap(enum fixed_addresses idx,
			       phys_addr_t phys, pgprot_t flags)
{
	unsigned long addr = __fix_to_virt(idx);
	pte_t *pte;

711
	BUG_ON(idx <= FIX_HOLE || idx >= __end_of_fixed_addresses);
712 713 714 715 716 717 718 719 720 721

	pte = fixmap_pte(addr);

	if (pgprot_val(flags)) {
		set_pte(pte, pfn_pte(phys >> PAGE_SHIFT, flags));
	} else {
		pte_clear(&init_mm, addr, pte);
		flush_tlb_kernel_range(addr, addr+PAGE_SIZE);
	}
}
722

723
void *__init __fixmap_remap_fdt(phys_addr_t dt_phys, int *size, pgprot_t prot)
724 725
{
	const u64 dt_virt_base = __fix_to_virt(FIX_FDT);
726
	int offset;
727 728 729 730 731
	void *dt_virt;

	/*
	 * Check whether the physical FDT address is set and meets the minimum
	 * alignment requirement. Since we are relying on MIN_FDT_ALIGN to be
732 733 734
	 * at least 8 bytes so that we can always access the magic and size
	 * fields of the FDT header after mapping the first chunk, double check
	 * here if that is indeed the case.
735 736 737 738 739 740 741 742
	 */
	BUILD_BUG_ON(MIN_FDT_ALIGN < 8);
	if (!dt_phys || dt_phys % MIN_FDT_ALIGN)
		return NULL;

	/*
	 * Make sure that the FDT region can be mapped without the need to
	 * allocate additional translation table pages, so that it is safe
743
	 * to call create_mapping_noalloc() this early.
744 745 746 747 748 749 750 751
	 *
	 * On 64k pages, the FDT will be mapped using PTEs, so we need to
	 * be in the same PMD as the rest of the fixmap.
	 * On 4k pages, we'll use section mappings for the FDT so we only
	 * have to be in the same PUD.
	 */
	BUILD_BUG_ON(dt_virt_base % SZ_2M);

752 753
	BUILD_BUG_ON(__fix_to_virt(FIX_FDT_END) >> SWAPPER_TABLE_SHIFT !=
		     __fix_to_virt(FIX_BTMAP_BEGIN) >> SWAPPER_TABLE_SHIFT);
754

755
	offset = dt_phys % SWAPPER_BLOCK_SIZE;
756 757 758
	dt_virt = (void *)dt_virt_base + offset;

	/* map the first chunk so we can read the size from the header */
759 760
	create_mapping_noalloc(round_down(dt_phys, SWAPPER_BLOCK_SIZE),
			dt_virt_base, SWAPPER_BLOCK_SIZE, prot);
761

762
	if (fdt_magic(dt_virt) != FDT_MAGIC)
763 764
		return NULL;

765 766
	*size = fdt_totalsize(dt_virt);
	if (*size > MAX_FDT_SIZE)
767 768
		return NULL;

769
	if (offset + *size > SWAPPER_BLOCK_SIZE)
770
		create_mapping_noalloc(round_down(dt_phys, SWAPPER_BLOCK_SIZE), dt_virt_base,
771
			       round_up(offset + *size, SWAPPER_BLOCK_SIZE), prot);
772

773 774
	return dt_virt;
}
775

776 777 778 779 780 781 782 783 784 785
void *__init fixmap_remap_fdt(phys_addr_t dt_phys)
{
	void *dt_virt;
	int size;

	dt_virt = __fixmap_remap_fdt(dt_phys, &size, PAGE_KERNEL_RO);
	if (!dt_virt)
		return NULL;

	memblock_reserve(dt_phys, size);
786 787
	return dt_virt;
}
788 789 790 791 792 793 794 795 796 797 798 799 800 801 802 803 804 805 806 807 808 809 810 811 812 813 814 815 816 817 818 819 820 821 822 823 824 825 826 827 828

int __init arch_ioremap_pud_supported(void)
{
	/* only 4k granule supports level 1 block mappings */
	return IS_ENABLED(CONFIG_ARM64_4K_PAGES);
}

int __init arch_ioremap_pmd_supported(void)
{
	return 1;
}

int pud_set_huge(pud_t *pud, phys_addr_t phys, pgprot_t prot)
{
	BUG_ON(phys & ~PUD_MASK);
	set_pud(pud, __pud(phys | PUD_TYPE_SECT | pgprot_val(mk_sect_prot(prot))));
	return 1;
}

int pmd_set_huge(pmd_t *pmd, phys_addr_t phys, pgprot_t prot)
{
	BUG_ON(phys & ~PMD_MASK);
	set_pmd(pmd, __pmd(phys | PMD_TYPE_SECT | pgprot_val(mk_sect_prot(prot))));
	return 1;
}

int pud_clear_huge(pud_t *pud)
{
	if (!pud_sect(*pud))
		return 0;
	pud_clear(pud);
	return 1;
}

int pmd_clear_huge(pmd_t *pmd)
{
	if (!pmd_sect(*pmd))
		return 0;
	pmd_clear(pmd);
	return 1;
}