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
) {
277 pmd_t
*pmd
= pmd_page
+ pmd_index(address
);
279 if (address
>= end
) {
280 if (!after_bootmem
) {
281 for (; i
< PTRS_PER_PMD
; i
++, pmd
++)
282 set_pmd(pmd
, __pmd(0));
290 entry
= __PAGE_KERNEL_LARGE
|_PAGE_GLOBAL
|address
;
291 entry
&= __supported_pte_mask
;
292 set_pmd(pmd
, __pmd(entry
));
296 static void __meminit
297 phys_pmd_update(pud_t
*pud
, unsigned long address
, unsigned long end
)
299 pmd_t
*pmd
= pmd_offset(pud
, 0);
300 spin_lock(&init_mm
.page_table_lock
);
301 phys_pmd_init(pmd
, address
, end
);
302 spin_unlock(&init_mm
.page_table_lock
);
306 static void __meminit
307 phys_pud_init(pud_t
*pud_page
, unsigned long addr
, unsigned long end
)
309 int i
= pud_index(addr
);
311 for (; i
< PTRS_PER_PUD
; i
++, addr
= (addr
& PUD_MASK
) + PUD_SIZE
) {
312 unsigned long pmd_phys
;
313 pud_t
*pud
= pud_page
+ pud_index(addr
);
319 if (!after_bootmem
&&
320 !e820_any_mapped(addr
, addr
+PUD_SIZE
, 0)) {
321 set_pud(pud
, __pud(0));
326 phys_pmd_update(pud
, addr
, end
);
330 pmd
= alloc_low_page(&pmd_phys
);
332 spin_lock(&init_mm
.page_table_lock
);
333 set_pud(pud
, __pud(pmd_phys
| _KERNPG_TABLE
));
334 phys_pmd_init(pmd
, addr
, end
);
335 spin_unlock(&init_mm
.page_table_lock
);
342 static void __init
find_early_table_space(unsigned long end
)
344 unsigned long puds
, pmds
, tables
, start
;
346 puds
= (end
+ PUD_SIZE
- 1) >> PUD_SHIFT
;
347 pmds
= (end
+ PMD_SIZE
- 1) >> PMD_SHIFT
;
348 tables
= round_up(puds
* sizeof(pud_t
), PAGE_SIZE
) +
349 round_up(pmds
* sizeof(pmd_t
), PAGE_SIZE
);
352 * RED-PEN putting page tables only on node 0 could
353 * cause a hotspot and fill up ZONE_DMA. The page tables
354 * need roughly 0.5KB per GB.
357 table_start
= find_e820_area(start
, end
, tables
, PAGE_SIZE
);
358 if (table_start
== -1UL)
359 panic("Cannot find space for the kernel page tables");
361 table_start
>>= PAGE_SHIFT
;
362 table_end
= table_start
;
364 early_printk("kernel direct mapping tables up to %lx @ %lx-%lx\n",
365 end
, table_start
<< PAGE_SHIFT
,
366 (table_start
<< PAGE_SHIFT
) + tables
);
370 * Setup the direct mapping of the physical memory at PAGE_OFFSET.
371 * This runs before bootmem is initialized and gets pages directly from
372 * the physical memory. To access them they are temporarily mapped.
374 void __init_refok
init_memory_mapping(unsigned long start
, unsigned long end
)
378 pr_debug("init_memory_mapping\n");
381 * Find space for the kernel direct mapping tables.
383 * Later we should allocate these tables in the local node of the
384 * memory mapped. Unfortunately this is done currently before the
385 * nodes are discovered.
388 find_early_table_space(end
);
390 start
= (unsigned long)__va(start
);
391 end
= (unsigned long)__va(end
);
393 for (; start
< end
; start
= next
) {
394 pgd_t
*pgd
= pgd_offset_k(start
);
395 unsigned long pud_phys
;
399 pud
= pud_offset(pgd
, start
& PGDIR_MASK
);
401 pud
= alloc_low_page(&pud_phys
);
403 next
= start
+ PGDIR_SIZE
;
406 phys_pud_init(pud
, __pa(start
), __pa(next
));
408 set_pgd(pgd_offset_k(start
), mk_kernel_pgd(pud_phys
));
413 mmu_cr4_features
= read_cr4();
417 reserve_early(table_start
<< PAGE_SHIFT
,
418 table_end
<< PAGE_SHIFT
, "PGTABLE");
422 void __init
paging_init(void)
424 unsigned long max_zone_pfns
[MAX_NR_ZONES
];
426 memset(max_zone_pfns
, 0, sizeof(max_zone_pfns
));
427 max_zone_pfns
[ZONE_DMA
] = MAX_DMA_PFN
;
428 max_zone_pfns
[ZONE_DMA32
] = MAX_DMA32_PFN
;
429 max_zone_pfns
[ZONE_NORMAL
] = end_pfn
;
431 memory_present(0, 0, end_pfn
);
433 free_area_init_nodes(max_zone_pfns
);
438 * Unmap a kernel mapping if it exists. This is useful to avoid
439 * prefetches from the CPU leading to inconsistent cache lines.
440 * address and size must be aligned to 2MB boundaries.
441 * Does nothing when the mapping doesn't exist.
443 void __init
clear_kernel_mapping(unsigned long address
, unsigned long size
)
445 unsigned long end
= address
+ size
;
447 BUG_ON(address
& ~LARGE_PAGE_MASK
);
448 BUG_ON(size
& ~LARGE_PAGE_MASK
);
450 for (; address
< end
; address
+= LARGE_PAGE_SIZE
) {
451 pgd_t
*pgd
= pgd_offset_k(address
);
458 pud
= pud_offset(pgd
, address
);
462 pmd
= pmd_offset(pud
, address
);
463 if (!pmd
|| pmd_none(*pmd
))
466 if (!(pmd_val(*pmd
) & _PAGE_PSE
)) {
468 * Could handle this, but it should not happen
471 printk(KERN_ERR
"clear_kernel_mapping: "
472 "mapping has been split. will leak memory\n");
475 set_pmd(pmd
, __pmd(0));
481 * Memory hotplug specific functions
483 void online_page(struct page
*page
)
485 ClearPageReserved(page
);
486 init_page_count(page
);
492 #ifdef CONFIG_MEMORY_HOTPLUG
494 * Memory is added always to NORMAL zone. This means you will never get
495 * additional DMA/DMA32 memory.
497 int arch_add_memory(int nid
, u64 start
, u64 size
)
499 struct pglist_data
*pgdat
= NODE_DATA(nid
);
500 struct zone
*zone
= pgdat
->node_zones
+ ZONE_NORMAL
;
501 unsigned long start_pfn
= start
>> PAGE_SHIFT
;
502 unsigned long nr_pages
= size
>> PAGE_SHIFT
;
505 init_memory_mapping(start
, start
+ size
-1);
507 ret
= __add_pages(zone
, start_pfn
, nr_pages
);
512 EXPORT_SYMBOL_GPL(arch_add_memory
);
514 #if !defined(CONFIG_ACPI_NUMA) && defined(CONFIG_NUMA)
515 int memory_add_physaddr_to_nid(u64 start
)
519 EXPORT_SYMBOL_GPL(memory_add_physaddr_to_nid
);
522 #endif /* CONFIG_MEMORY_HOTPLUG */
524 static struct kcore_list kcore_mem
, kcore_vmalloc
, kcore_kernel
,
525 kcore_modules
, kcore_vsyscall
;
527 void __init
mem_init(void)
529 long codesize
, reservedpages
, datasize
, initsize
;
533 /* clear_bss() already clear the empty_zero_page */
535 /* temporary debugging - double check it's true: */
539 for (i
= 0; i
< 1024; i
++)
540 WARN_ON_ONCE(empty_zero_page
[i
]);
545 /* this will put all low memory onto the freelists */
547 totalram_pages
= numa_free_all_bootmem();
549 totalram_pages
= free_all_bootmem();
551 reservedpages
= end_pfn
- totalram_pages
-
552 absent_pages_in_range(0, end_pfn
);
555 codesize
= (unsigned long) &_etext
- (unsigned long) &_text
;
556 datasize
= (unsigned long) &_edata
- (unsigned long) &_etext
;
557 initsize
= (unsigned long) &__init_end
- (unsigned long) &__init_begin
;
559 /* Register memory areas for /proc/kcore */
560 kclist_add(&kcore_mem
, __va(0), max_low_pfn
<< PAGE_SHIFT
);
561 kclist_add(&kcore_vmalloc
, (void *)VMALLOC_START
,
562 VMALLOC_END
-VMALLOC_START
);
563 kclist_add(&kcore_kernel
, &_stext
, _end
- _stext
);
564 kclist_add(&kcore_modules
, (void *)MODULES_VADDR
, MODULES_LEN
);
565 kclist_add(&kcore_vsyscall
, (void *)VSYSCALL_START
,
566 VSYSCALL_END
- VSYSCALL_START
);
568 printk(KERN_INFO
"Memory: %luk/%luk available (%ldk kernel code, "
569 "%ldk reserved, %ldk data, %ldk init)\n",
570 (unsigned long) nr_free_pages() << (PAGE_SHIFT
-10),
571 end_pfn
<< (PAGE_SHIFT
-10),
573 reservedpages
<< (PAGE_SHIFT
-10),
578 void free_init_pages(char *what
, unsigned long begin
, unsigned long end
)
586 * If debugging page accesses then do not free this memory but
587 * mark them not present - any buggy init-section access will
588 * create a kernel page fault:
590 #ifdef CONFIG_DEBUG_PAGEALLOC
591 printk(KERN_INFO
"debug: unmapping init memory %08lx..%08lx\n",
592 begin
, PAGE_ALIGN(end
));
593 set_memory_np(begin
, (end
- begin
) >> PAGE_SHIFT
);
595 printk(KERN_INFO
"Freeing %s: %luk freed\n", what
, (end
- begin
) >> 10);
597 for (addr
= begin
; addr
< end
; addr
+= PAGE_SIZE
) {
598 ClearPageReserved(virt_to_page(addr
));
599 init_page_count(virt_to_page(addr
));
600 memset((void *)(addr
& ~(PAGE_SIZE
-1)),
601 POISON_FREE_INITMEM
, PAGE_SIZE
);
608 void free_initmem(void)
610 free_init_pages("unused kernel memory",
611 (unsigned long)(&__init_begin
),
612 (unsigned long)(&__init_end
));
615 #ifdef CONFIG_DEBUG_RODATA
616 const int rodata_test_data
= 0xC3;
617 EXPORT_SYMBOL_GPL(rodata_test_data
);
619 void mark_rodata_ro(void)
621 unsigned long start
= (unsigned long)_stext
, end
;
623 #ifdef CONFIG_HOTPLUG_CPU
624 /* It must still be possible to apply SMP alternatives. */
625 if (num_possible_cpus() > 1)
626 start
= (unsigned long)_etext
;
629 #ifdef CONFIG_KPROBES
630 start
= (unsigned long)__start_rodata
;
633 end
= (unsigned long)__end_rodata
;
634 start
= (start
+ PAGE_SIZE
- 1) & PAGE_MASK
;
639 set_memory_ro(start
, (end
- start
) >> PAGE_SHIFT
);
641 printk(KERN_INFO
"Write protecting the kernel read-only data: %luk\n",
642 (end
- start
) >> 10);
646 #ifdef CONFIG_CPA_DEBUG
647 printk(KERN_INFO
"Testing CPA: undo %lx-%lx\n", start
, end
);
648 set_memory_rw(start
, (end
-start
) >> PAGE_SHIFT
);
650 printk(KERN_INFO
"Testing CPA: again\n");
651 set_memory_ro(start
, (end
-start
) >> PAGE_SHIFT
);
656 #ifdef CONFIG_BLK_DEV_INITRD
657 void free_initrd_mem(unsigned long start
, unsigned long end
)
659 free_init_pages("initrd memory", start
, end
);
663 void __init
reserve_bootmem_generic(unsigned long phys
, unsigned len
)
666 int nid
= phys_to_nid(phys
);
668 unsigned long pfn
= phys
>> PAGE_SHIFT
;
670 if (pfn
>= end_pfn
) {
672 * This can happen with kdump kernels when accessing
675 if (pfn
< end_pfn_map
)
678 printk(KERN_ERR
"reserve_bootmem: illegal reserve %lx %u\n",
683 /* Should check here against the e820 map to avoid double free */
685 reserve_bootmem_node(NODE_DATA(nid
), phys
, len
);
687 reserve_bootmem(phys
, len
);
689 if (phys
+len
<= MAX_DMA_PFN
*PAGE_SIZE
) {
690 dma_reserve
+= len
/ PAGE_SIZE
;
691 set_dma_reserve(dma_reserve
);
695 int kern_addr_valid(unsigned long addr
)
697 unsigned long above
= ((long)addr
) >> __VIRTUAL_MASK_SHIFT
;
703 if (above
!= 0 && above
!= -1UL)
706 pgd
= pgd_offset_k(addr
);
710 pud
= pud_offset(pgd
, addr
);
714 pmd
= pmd_offset(pud
, addr
);
719 return pfn_valid(pmd_pfn(*pmd
));
721 pte
= pte_offset_kernel(pmd
, addr
);
725 return pfn_valid(pte_pfn(*pte
));
729 * A pseudo VMA to allow ptrace access for the vsyscall page. This only
730 * covers the 64bit vsyscall page now. 32bit has a real VMA now and does
731 * not need special handling anymore:
733 static struct vm_area_struct gate_vma
= {
734 .vm_start
= VSYSCALL_START
,
735 .vm_end
= VSYSCALL_START
+ (VSYSCALL_MAPPED_PAGES
* PAGE_SIZE
),
736 .vm_page_prot
= PAGE_READONLY_EXEC
,
737 .vm_flags
= VM_READ
| VM_EXEC
740 struct vm_area_struct
*get_gate_vma(struct task_struct
*tsk
)
742 #ifdef CONFIG_IA32_EMULATION
743 if (test_tsk_thread_flag(tsk
, TIF_IA32
))
749 int in_gate_area(struct task_struct
*task
, unsigned long addr
)
751 struct vm_area_struct
*vma
= get_gate_vma(task
);
756 return (addr
>= vma
->vm_start
) && (addr
< vma
->vm_end
);
760 * Use this when you have no reliable task/vma, typically from interrupt
761 * context. It is less reliable than using the task's vma and may give
764 int in_gate_area_no_task(unsigned long addr
)
766 return (addr
>= VSYSCALL_START
) && (addr
< VSYSCALL_END
);
769 const char *arch_vma_name(struct vm_area_struct
*vma
)
771 if (vma
->vm_mm
&& vma
->vm_start
== (long)vma
->vm_mm
->context
.vdso
)
773 if (vma
== &gate_vma
)
778 #ifdef CONFIG_SPARSEMEM_VMEMMAP
780 * Initialise the sparsemem vmemmap using huge-pages at the PMD level.
783 vmemmap_populate(struct page
*start_page
, unsigned long size
, int node
)
785 unsigned long addr
= (unsigned long)start_page
;
786 unsigned long end
= (unsigned long)(start_page
+ size
);
792 for (; addr
< end
; addr
= next
) {
793 next
= pmd_addr_end(addr
, end
);
795 pgd
= vmemmap_pgd_populate(addr
, node
);
799 pud
= vmemmap_pud_populate(pgd
, addr
, node
);
803 pmd
= pmd_offset(pud
, addr
);
804 if (pmd_none(*pmd
)) {
808 p
= vmemmap_alloc_block(PMD_SIZE
, node
);
812 entry
= pfn_pte(__pa(p
) >> PAGE_SHIFT
,
814 set_pmd(pmd
, __pmd(pte_val(entry
)));
816 printk(KERN_DEBUG
" [%lx-%lx] PMD ->%p on node %d\n",
817 addr
, addr
+ PMD_SIZE
- 1, p
, node
);
819 vmemmap_verify((pte_t
*)pmd
, node
, addr
, next
);