2 * linux/arch/x86_64/mm/init.c
4 * Copyright (C) 1995 Linus Torvalds
5 * Copyright (C) 2000 Pavel Machek <pavel@suse.cz>
6 * Copyright (C) 2002,2003 Andi Kleen <ak@suse.de>
9 #include <linux/signal.h>
10 #include <linux/sched.h>
11 #include <linux/kernel.h>
12 #include <linux/errno.h>
13 #include <linux/string.h>
14 #include <linux/types.h>
15 #include <linux/ptrace.h>
16 #include <linux/mman.h>
18 #include <linux/swap.h>
19 #include <linux/smp.h>
20 #include <linux/init.h>
21 #include <linux/pagemap.h>
22 #include <linux/bootmem.h>
23 #include <linux/proc_fs.h>
24 #include <linux/pci.h>
25 #include <linux/pfn.h>
26 #include <linux/poison.h>
27 #include <linux/dma-mapping.h>
28 #include <linux/module.h>
29 #include <linux/memory_hotplug.h>
30 #include <linux/nmi.h>
32 #include <asm/processor.h>
33 #include <asm/system.h>
34 #include <asm/uaccess.h>
35 #include <asm/pgtable.h>
36 #include <asm/pgalloc.h>
38 #include <asm/fixmap.h>
42 #include <asm/mmu_context.h>
43 #include <asm/proto.h>
45 #include <asm/sections.h>
46 #include <asm/kdebug.h>
49 const struct dma_mapping_ops
*dma_ops
;
50 EXPORT_SYMBOL(dma_ops
);
52 static unsigned long dma_reserve __initdata
;
54 DEFINE_PER_CPU(struct mmu_gather
, mmu_gathers
);
57 * NOTE: pagetable_init alloc all the fixmap pagetables contiguous on the
58 * physical space so we can cache the place of the first one and move
59 * around without checking the pgd every time.
64 long i
, total
= 0, reserved
= 0;
65 long shared
= 0, cached
= 0;
69 printk(KERN_INFO
"Mem-info:\n");
71 printk(KERN_INFO
"Free swap: %6ldkB\n",
72 nr_swap_pages
<< (PAGE_SHIFT
-10));
74 for_each_online_pgdat(pgdat
) {
75 for (i
= 0; i
< pgdat
->node_spanned_pages
; ++i
) {
77 * This loop can take a while with 256 GB and
78 * 4k pages so defer the NMI watchdog:
80 if (unlikely(i
% MAX_ORDER_NR_PAGES
== 0))
83 if (!pfn_valid(pgdat
->node_start_pfn
+ i
))
86 page
= pfn_to_page(pgdat
->node_start_pfn
+ i
);
88 if (PageReserved(page
))
90 else if (PageSwapCache(page
))
92 else if (page_count(page
))
93 shared
+= page_count(page
) - 1;
96 printk(KERN_INFO
"%lu pages of RAM\n", total
);
97 printk(KERN_INFO
"%lu reserved pages\n", reserved
);
98 printk(KERN_INFO
"%lu pages shared\n", shared
);
99 printk(KERN_INFO
"%lu pages swap cached\n", cached
);
104 static __init
void *spp_getpage(void)
109 ptr
= (void *) get_zeroed_page(GFP_ATOMIC
);
111 ptr
= alloc_bootmem_pages(PAGE_SIZE
);
113 if (!ptr
|| ((unsigned long)ptr
& ~PAGE_MASK
)) {
114 panic("set_pte_phys: cannot allocate page data %s\n",
115 after_bootmem
? "after bootmem" : "");
118 pr_debug("spp_getpage %p\n", ptr
);
124 set_pte_phys(unsigned long vaddr
, unsigned long phys
, pgprot_t prot
)
131 pr_debug("set_pte_phys %lx to %lx\n", vaddr
, phys
);
133 pgd
= pgd_offset_k(vaddr
);
134 if (pgd_none(*pgd
)) {
136 "PGD FIXMAP MISSING, it should be setup in head.S!\n");
139 pud
= pud_offset(pgd
, vaddr
);
140 if (pud_none(*pud
)) {
141 pmd
= (pmd_t
*) spp_getpage();
142 set_pud(pud
, __pud(__pa(pmd
) | _KERNPG_TABLE
| _PAGE_USER
));
143 if (pmd
!= pmd_offset(pud
, 0)) {
144 printk(KERN_ERR
"PAGETABLE BUG #01! %p <-> %p\n",
145 pmd
, pmd_offset(pud
, 0));
149 pmd
= pmd_offset(pud
, vaddr
);
150 if (pmd_none(*pmd
)) {
151 pte
= (pte_t
*) spp_getpage();
152 set_pmd(pmd
, __pmd(__pa(pte
) | _KERNPG_TABLE
| _PAGE_USER
));
153 if (pte
!= pte_offset_kernel(pmd
, 0)) {
154 printk(KERN_ERR
"PAGETABLE BUG #02!\n");
158 new_pte
= pfn_pte(phys
>> PAGE_SHIFT
, prot
);
160 pte
= pte_offset_kernel(pmd
, vaddr
);
161 if (!pte_none(*pte
) &&
162 pte_val(*pte
) != (pte_val(new_pte
) & __supported_pte_mask
))
164 set_pte(pte
, new_pte
);
167 * It's enough to flush this one mapping.
168 * (PGE mappings get flushed as well)
170 __flush_tlb_one(vaddr
);
173 /* NOTE: this is meant to be run only at boot */
175 __set_fixmap(enum fixed_addresses idx
, unsigned long phys
, pgprot_t prot
)
177 unsigned long address
= __fix_to_virt(idx
);
179 if (idx
>= __end_of_fixed_addresses
) {
180 printk(KERN_ERR
"Invalid __set_fixmap\n");
183 set_pte_phys(address
, phys
, prot
);
186 static unsigned long __initdata table_start
;
187 static unsigned long __meminitdata table_end
;
189 static __meminit
void *alloc_low_page(unsigned long *phys
)
191 unsigned long pfn
= table_end
++;
195 adr
= (void *)get_zeroed_page(GFP_ATOMIC
);
202 panic("alloc_low_page: ran out of memory");
204 adr
= early_ioremap(pfn
* PAGE_SIZE
, PAGE_SIZE
);
205 memset(adr
, 0, PAGE_SIZE
);
206 *phys
= pfn
* PAGE_SIZE
;
210 static __meminit
void unmap_low_page(void *adr
)
215 early_iounmap(adr
, PAGE_SIZE
);
218 /* Must run before zap_low_mappings */
219 __meminit
void *early_ioremap(unsigned long addr
, unsigned long size
)
221 pmd_t
*pmd
, *last_pmd
;
225 pmds
= ((addr
& ~PMD_MASK
) + size
+ ~PMD_MASK
) / PMD_SIZE
;
226 vaddr
= __START_KERNEL_map
;
227 pmd
= level2_kernel_pgt
;
228 last_pmd
= level2_kernel_pgt
+ PTRS_PER_PMD
- 1;
230 for (; pmd
<= last_pmd
; pmd
++, vaddr
+= PMD_SIZE
) {
231 for (i
= 0; i
< pmds
; i
++) {
232 if (pmd_present(pmd
[i
]))
233 goto continue_outer_loop
;
235 vaddr
+= addr
& ~PMD_MASK
;
238 for (i
= 0; i
< pmds
; i
++, addr
+= PMD_SIZE
)
239 set_pmd(pmd
+i
, __pmd(addr
| __PAGE_KERNEL_LARGE_EXEC
));
242 return (void *)vaddr
;
246 printk(KERN_ERR
"early_ioremap(0x%lx, %lu) failed\n", addr
, size
);
252 * To avoid virtual aliases later:
254 __meminit
void early_iounmap(void *addr
, unsigned long size
)
260 vaddr
= (unsigned long)addr
;
261 pmds
= ((vaddr
& ~PMD_MASK
) + size
+ ~PMD_MASK
) / PMD_SIZE
;
262 pmd
= level2_kernel_pgt
+ pmd_index(vaddr
);
264 for (i
= 0; i
< pmds
; i
++)
270 static void __meminit
271 phys_pmd_init(pmd_t
*pmd_page
, unsigned long address
, unsigned long end
)
273 int i
= pmd_index(address
);
275 for (; i
< PTRS_PER_PMD
; i
++, address
+= PMD_SIZE
) {
276 pmd_t
*pmd
= pmd_page
+ pmd_index(address
);
278 if (address
>= end
) {
279 if (!after_bootmem
) {
280 for (; i
< PTRS_PER_PMD
; i
++, pmd
++)
281 set_pmd(pmd
, __pmd(0));
289 set_pte((pte_t
*)pmd
,
290 pfn_pte(address
>> PAGE_SHIFT
, PAGE_KERNEL_LARGE
));
294 static void __meminit
295 phys_pmd_update(pud_t
*pud
, unsigned long address
, unsigned long end
)
297 pmd_t
*pmd
= pmd_offset(pud
, 0);
298 spin_lock(&init_mm
.page_table_lock
);
299 phys_pmd_init(pmd
, address
, end
);
300 spin_unlock(&init_mm
.page_table_lock
);
304 static void __meminit
305 phys_pud_init(pud_t
*pud_page
, unsigned long addr
, unsigned long end
)
307 int i
= pud_index(addr
);
309 for (; i
< PTRS_PER_PUD
; i
++, addr
= (addr
& PUD_MASK
) + PUD_SIZE
) {
310 unsigned long pmd_phys
;
311 pud_t
*pud
= pud_page
+ pud_index(addr
);
317 if (!after_bootmem
&&
318 !e820_any_mapped(addr
, addr
+PUD_SIZE
, 0)) {
319 set_pud(pud
, __pud(0));
324 phys_pmd_update(pud
, addr
, end
);
328 pmd
= alloc_low_page(&pmd_phys
);
330 spin_lock(&init_mm
.page_table_lock
);
331 set_pud(pud
, __pud(pmd_phys
| _KERNPG_TABLE
));
332 phys_pmd_init(pmd
, addr
, end
);
333 spin_unlock(&init_mm
.page_table_lock
);
340 static void __init
find_early_table_space(unsigned long end
)
342 unsigned long puds
, pmds
, tables
, start
;
344 puds
= (end
+ PUD_SIZE
- 1) >> PUD_SHIFT
;
345 pmds
= (end
+ PMD_SIZE
- 1) >> PMD_SHIFT
;
346 tables
= round_up(puds
* sizeof(pud_t
), PAGE_SIZE
) +
347 round_up(pmds
* sizeof(pmd_t
), PAGE_SIZE
);
350 * RED-PEN putting page tables only on node 0 could
351 * cause a hotspot and fill up ZONE_DMA. The page tables
352 * need roughly 0.5KB per GB.
355 table_start
= find_e820_area(start
, end
, tables
, PAGE_SIZE
);
356 if (table_start
== -1UL)
357 panic("Cannot find space for the kernel page tables");
359 table_start
>>= PAGE_SHIFT
;
360 table_end
= table_start
;
362 early_printk("kernel direct mapping tables up to %lx @ %lx-%lx\n",
363 end
, table_start
<< PAGE_SHIFT
,
364 (table_start
<< PAGE_SHIFT
) + tables
);
368 * Setup the direct mapping of the physical memory at PAGE_OFFSET.
369 * This runs before bootmem is initialized and gets pages directly from
370 * the physical memory. To access them they are temporarily mapped.
372 void __init_refok
init_memory_mapping(unsigned long start
, unsigned long end
)
376 pr_debug("init_memory_mapping\n");
379 * Find space for the kernel direct mapping tables.
381 * Later we should allocate these tables in the local node of the
382 * memory mapped. Unfortunately this is done currently before the
383 * nodes are discovered.
386 find_early_table_space(end
);
388 start
= (unsigned long)__va(start
);
389 end
= (unsigned long)__va(end
);
391 for (; start
< end
; start
= next
) {
392 pgd_t
*pgd
= pgd_offset_k(start
);
393 unsigned long pud_phys
;
397 pud
= pud_offset(pgd
, start
& PGDIR_MASK
);
399 pud
= alloc_low_page(&pud_phys
);
401 next
= start
+ PGDIR_SIZE
;
404 phys_pud_init(pud
, __pa(start
), __pa(next
));
406 set_pgd(pgd_offset_k(start
), mk_kernel_pgd(pud_phys
));
411 mmu_cr4_features
= read_cr4();
415 reserve_early(table_start
<< PAGE_SHIFT
,
416 table_end
<< PAGE_SHIFT
, "PGTABLE");
420 void __init
paging_init(void)
422 unsigned long max_zone_pfns
[MAX_NR_ZONES
];
424 memset(max_zone_pfns
, 0, sizeof(max_zone_pfns
));
425 max_zone_pfns
[ZONE_DMA
] = MAX_DMA_PFN
;
426 max_zone_pfns
[ZONE_DMA32
] = MAX_DMA32_PFN
;
427 max_zone_pfns
[ZONE_NORMAL
] = end_pfn
;
429 memory_present(0, 0, end_pfn
);
431 free_area_init_nodes(max_zone_pfns
);
436 * Memory hotplug specific functions
438 void online_page(struct page
*page
)
440 ClearPageReserved(page
);
441 init_page_count(page
);
447 #ifdef CONFIG_MEMORY_HOTPLUG
449 * Memory is added always to NORMAL zone. This means you will never get
450 * additional DMA/DMA32 memory.
452 int arch_add_memory(int nid
, u64 start
, u64 size
)
454 struct pglist_data
*pgdat
= NODE_DATA(nid
);
455 struct zone
*zone
= pgdat
->node_zones
+ ZONE_NORMAL
;
456 unsigned long start_pfn
= start
>> PAGE_SHIFT
;
457 unsigned long nr_pages
= size
>> PAGE_SHIFT
;
460 init_memory_mapping(start
, start
+ size
-1);
462 ret
= __add_pages(zone
, start_pfn
, nr_pages
);
467 EXPORT_SYMBOL_GPL(arch_add_memory
);
469 #if !defined(CONFIG_ACPI_NUMA) && defined(CONFIG_NUMA)
470 int memory_add_physaddr_to_nid(u64 start
)
474 EXPORT_SYMBOL_GPL(memory_add_physaddr_to_nid
);
477 #endif /* CONFIG_MEMORY_HOTPLUG */
479 static struct kcore_list kcore_mem
, kcore_vmalloc
, kcore_kernel
,
480 kcore_modules
, kcore_vsyscall
;
482 void __init
mem_init(void)
484 long codesize
, reservedpages
, datasize
, initsize
;
488 /* clear_bss() already clear the empty_zero_page */
490 /* temporary debugging - double check it's true: */
494 for (i
= 0; i
< 1024; i
++)
495 WARN_ON_ONCE(empty_zero_page
[i
]);
500 /* this will put all low memory onto the freelists */
502 totalram_pages
= numa_free_all_bootmem();
504 totalram_pages
= free_all_bootmem();
506 reservedpages
= end_pfn
- totalram_pages
-
507 absent_pages_in_range(0, end_pfn
);
510 codesize
= (unsigned long) &_etext
- (unsigned long) &_text
;
511 datasize
= (unsigned long) &_edata
- (unsigned long) &_etext
;
512 initsize
= (unsigned long) &__init_end
- (unsigned long) &__init_begin
;
514 /* Register memory areas for /proc/kcore */
515 kclist_add(&kcore_mem
, __va(0), max_low_pfn
<< PAGE_SHIFT
);
516 kclist_add(&kcore_vmalloc
, (void *)VMALLOC_START
,
517 VMALLOC_END
-VMALLOC_START
);
518 kclist_add(&kcore_kernel
, &_stext
, _end
- _stext
);
519 kclist_add(&kcore_modules
, (void *)MODULES_VADDR
, MODULES_LEN
);
520 kclist_add(&kcore_vsyscall
, (void *)VSYSCALL_START
,
521 VSYSCALL_END
- VSYSCALL_START
);
523 printk(KERN_INFO
"Memory: %luk/%luk available (%ldk kernel code, "
524 "%ldk reserved, %ldk data, %ldk init)\n",
525 (unsigned long) nr_free_pages() << (PAGE_SHIFT
-10),
526 end_pfn
<< (PAGE_SHIFT
-10),
528 reservedpages
<< (PAGE_SHIFT
-10),
533 void free_init_pages(char *what
, unsigned long begin
, unsigned long end
)
541 * If debugging page accesses then do not free this memory but
542 * mark them not present - any buggy init-section access will
543 * create a kernel page fault:
545 #ifdef CONFIG_DEBUG_PAGEALLOC
546 printk(KERN_INFO
"debug: unmapping init memory %08lx..%08lx\n",
547 begin
, PAGE_ALIGN(end
));
548 set_memory_np(begin
, (end
- begin
) >> PAGE_SHIFT
);
550 printk(KERN_INFO
"Freeing %s: %luk freed\n", what
, (end
- begin
) >> 10);
552 for (addr
= begin
; addr
< end
; addr
+= PAGE_SIZE
) {
553 ClearPageReserved(virt_to_page(addr
));
554 init_page_count(virt_to_page(addr
));
555 memset((void *)(addr
& ~(PAGE_SIZE
-1)),
556 POISON_FREE_INITMEM
, PAGE_SIZE
);
563 void free_initmem(void)
565 free_init_pages("unused kernel memory",
566 (unsigned long)(&__init_begin
),
567 (unsigned long)(&__init_end
));
570 #ifdef CONFIG_DEBUG_RODATA
571 const int rodata_test_data
= 0xC3;
572 EXPORT_SYMBOL_GPL(rodata_test_data
);
574 void mark_rodata_ro(void)
576 unsigned long start
= (unsigned long)_stext
, end
;
578 #ifdef CONFIG_HOTPLUG_CPU
579 /* It must still be possible to apply SMP alternatives. */
580 if (num_possible_cpus() > 1)
581 start
= (unsigned long)_etext
;
584 #ifdef CONFIG_KPROBES
585 start
= (unsigned long)__start_rodata
;
588 end
= (unsigned long)__end_rodata
;
589 start
= (start
+ PAGE_SIZE
- 1) & PAGE_MASK
;
595 printk(KERN_INFO
"Write protecting the kernel read-only data: %luk\n",
596 (end
- start
) >> 10);
597 set_memory_ro(start
, (end
- start
) >> PAGE_SHIFT
);
600 * The rodata section (but not the kernel text!) should also be
603 start
= ((unsigned long)__start_rodata
+ PAGE_SIZE
- 1) & PAGE_MASK
;
604 set_memory_nx(start
, (end
- start
) >> PAGE_SHIFT
);
608 #ifdef CONFIG_CPA_DEBUG
609 printk(KERN_INFO
"Testing CPA: undo %lx-%lx\n", start
, end
);
610 set_memory_rw(start
, (end
-start
) >> PAGE_SHIFT
);
612 printk(KERN_INFO
"Testing CPA: again\n");
613 set_memory_ro(start
, (end
-start
) >> PAGE_SHIFT
);
618 #ifdef CONFIG_BLK_DEV_INITRD
619 void free_initrd_mem(unsigned long start
, unsigned long end
)
621 free_init_pages("initrd memory", start
, end
);
625 void __init
reserve_bootmem_generic(unsigned long phys
, unsigned len
)
628 int nid
= phys_to_nid(phys
);
630 unsigned long pfn
= phys
>> PAGE_SHIFT
;
632 if (pfn
>= end_pfn
) {
634 * This can happen with kdump kernels when accessing
637 if (pfn
< end_pfn_map
)
640 printk(KERN_ERR
"reserve_bootmem: illegal reserve %lx %u\n",
645 /* Should check here against the e820 map to avoid double free */
647 reserve_bootmem_node(NODE_DATA(nid
), phys
, len
, BOOTMEM_DEFAULT
);
649 reserve_bootmem(phys
, len
, BOOTMEM_DEFAULT
);
651 if (phys
+len
<= MAX_DMA_PFN
*PAGE_SIZE
) {
652 dma_reserve
+= len
/ PAGE_SIZE
;
653 set_dma_reserve(dma_reserve
);
657 int kern_addr_valid(unsigned long addr
)
659 unsigned long above
= ((long)addr
) >> __VIRTUAL_MASK_SHIFT
;
665 if (above
!= 0 && above
!= -1UL)
668 pgd
= pgd_offset_k(addr
);
672 pud
= pud_offset(pgd
, addr
);
676 pmd
= pmd_offset(pud
, addr
);
681 return pfn_valid(pmd_pfn(*pmd
));
683 pte
= pte_offset_kernel(pmd
, addr
);
687 return pfn_valid(pte_pfn(*pte
));
691 * A pseudo VMA to allow ptrace access for the vsyscall page. This only
692 * covers the 64bit vsyscall page now. 32bit has a real VMA now and does
693 * not need special handling anymore:
695 static struct vm_area_struct gate_vma
= {
696 .vm_start
= VSYSCALL_START
,
697 .vm_end
= VSYSCALL_START
+ (VSYSCALL_MAPPED_PAGES
* PAGE_SIZE
),
698 .vm_page_prot
= PAGE_READONLY_EXEC
,
699 .vm_flags
= VM_READ
| VM_EXEC
702 struct vm_area_struct
*get_gate_vma(struct task_struct
*tsk
)
704 #ifdef CONFIG_IA32_EMULATION
705 if (test_tsk_thread_flag(tsk
, TIF_IA32
))
711 int in_gate_area(struct task_struct
*task
, unsigned long addr
)
713 struct vm_area_struct
*vma
= get_gate_vma(task
);
718 return (addr
>= vma
->vm_start
) && (addr
< vma
->vm_end
);
722 * Use this when you have no reliable task/vma, typically from interrupt
723 * context. It is less reliable than using the task's vma and may give
726 int in_gate_area_no_task(unsigned long addr
)
728 return (addr
>= VSYSCALL_START
) && (addr
< VSYSCALL_END
);
731 const char *arch_vma_name(struct vm_area_struct
*vma
)
733 if (vma
->vm_mm
&& vma
->vm_start
== (long)vma
->vm_mm
->context
.vdso
)
735 if (vma
== &gate_vma
)
740 #ifdef CONFIG_SPARSEMEM_VMEMMAP
742 * Initialise the sparsemem vmemmap using huge-pages at the PMD level.
745 vmemmap_populate(struct page
*start_page
, unsigned long size
, int node
)
747 unsigned long addr
= (unsigned long)start_page
;
748 unsigned long end
= (unsigned long)(start_page
+ size
);
754 for (; addr
< end
; addr
= next
) {
755 next
= pmd_addr_end(addr
, end
);
757 pgd
= vmemmap_pgd_populate(addr
, node
);
761 pud
= vmemmap_pud_populate(pgd
, addr
, node
);
765 pmd
= pmd_offset(pud
, addr
);
766 if (pmd_none(*pmd
)) {
770 p
= vmemmap_alloc_block(PMD_SIZE
, node
);
774 entry
= pfn_pte(__pa(p
) >> PAGE_SHIFT
,
776 set_pmd(pmd
, __pmd(pte_val(entry
)));
778 printk(KERN_DEBUG
" [%lx-%lx] PMD ->%p on node %d\n",
779 addr
, addr
+ PMD_SIZE
- 1, p
, node
);
781 vmemmap_verify((pte_t
*)pmd
, node
, addr
, next
);