1/*
2 * linux/arch/sh/mm/init.c
3 *
4 *  Copyright (C) 1999  Niibe Yutaka
5 *  Copyright (C) 2002 - 2010  Paul Mundt
6 *
7 *  Based on linux/arch/i386/mm/init.c:
8 *   Copyright (C) 1995  Linus Torvalds
9 */
10#include <linux/mm.h>
11#include <linux/swap.h>
12#include <linux/init.h>
13#include <linux/gfp.h>
14#include <linux/bootmem.h>
15#include <linux/proc_fs.h>
16#include <linux/pagemap.h>
17#include <linux/percpu.h>
18#include <linux/io.h>
19#include <linux/memblock.h>
20#include <linux/dma-mapping.h>
21#include <asm/mmu_context.h>
22#include <asm/mmzone.h>
23#include <asm/kexec.h>
24#include <asm/tlb.h>
25#include <asm/cacheflush.h>
26#include <asm/sections.h>
27#include <asm/setup.h>
28#include <asm/cache.h>
29#include <asm/sizes.h>
30
31DEFINE_PER_CPU(struct mmu_gather, mmu_gathers);
32pgd_t swapper_pg_dir[PTRS_PER_PGD];
33
34void __init generic_mem_init(void)
35{
36	memblock_add(__MEMORY_START, __MEMORY_SIZE);
37}
38
39void __init __weak plat_mem_setup(void)
40{
41	/* Nothing to see here, move along. */
42}
43
44#ifdef CONFIG_MMU
45static pte_t *__get_pte_phys(unsigned long addr)
46{
47	pgd_t *pgd;
48	pud_t *pud;
49	pmd_t *pmd;
50	pte_t *pte;
51
52	pgd = pgd_offset_k(addr);
53	if (pgd_none(*pgd)) {
54		pgd_ERROR(*pgd);
55		return NULL;
56	}
57
58	pud = pud_alloc(NULL, pgd, addr);
59	if (unlikely(!pud)) {
60		pud_ERROR(*pud);
61		return NULL;
62	}
63
64	pmd = pmd_alloc(NULL, pud, addr);
65	if (unlikely(!pmd)) {
66		pmd_ERROR(*pmd);
67		return NULL;
68	}
69
70	pte = pte_offset_kernel(pmd, addr);
71	return pte;
72}
73
74static void set_pte_phys(unsigned long addr, unsigned long phys, pgprot_t prot)
75{
76	pte_t *pte;
77
78	pte = __get_pte_phys(addr);
79	if (!pte_none(*pte)) {
80		pte_ERROR(*pte);
81		return;
82	}
83
84	set_pte(pte, pfn_pte(phys >> PAGE_SHIFT, prot));
85	local_flush_tlb_one(get_asid(), addr);
86
87	if (pgprot_val(prot) & _PAGE_WIRED)
88		tlb_wire_entry(NULL, addr, *pte);
89}
90
91static void clear_pte_phys(unsigned long addr, pgprot_t prot)
92{
93	pte_t *pte;
94
95	pte = __get_pte_phys(addr);
96
97	if (pgprot_val(prot) & _PAGE_WIRED)
98		tlb_unwire_entry();
99
100	set_pte(pte, pfn_pte(0, __pgprot(0)));
101	local_flush_tlb_one(get_asid(), addr);
102}
103
104void __set_fixmap(enum fixed_addresses idx, unsigned long phys, pgprot_t prot)
105{
106	unsigned long address = __fix_to_virt(idx);
107
108	if (idx >= __end_of_fixed_addresses) {
109		BUG();
110		return;
111	}
112
113	set_pte_phys(address, phys, prot);
114}
115
116void __clear_fixmap(enum fixed_addresses idx, pgprot_t prot)
117{
118	unsigned long address = __fix_to_virt(idx);
119
120	if (idx >= __end_of_fixed_addresses) {
121		BUG();
122		return;
123	}
124
125	clear_pte_phys(address, prot);
126}
127
128void __init page_table_range_init(unsigned long start, unsigned long end,
129					 pgd_t *pgd_base)
130{
131	pgd_t *pgd;
132	pud_t *pud;
133	pmd_t *pmd;
134	pte_t *pte;
135	int i, j, k;
136	unsigned long vaddr;
137
138	vaddr = start;
139	i = __pgd_offset(vaddr);
140	j = __pud_offset(vaddr);
141	k = __pmd_offset(vaddr);
142	pgd = pgd_base + i;
143
144	for ( ; (i < PTRS_PER_PGD) && (vaddr != end); pgd++, i++) {
145		pud = (pud_t *)pgd;
146		for ( ; (j < PTRS_PER_PUD) && (vaddr != end); pud++, j++) {
147#ifdef __PAGETABLE_PMD_FOLDED
148			pmd = (pmd_t *)pud;
149#else
150			pmd = (pmd_t *)alloc_bootmem_low_pages(PAGE_SIZE);
151			pud_populate(&init_mm, pud, pmd);
152			pmd += k;
153#endif
154			for (; (k < PTRS_PER_PMD) && (vaddr != end); pmd++, k++) {
155				if (pmd_none(*pmd)) {
156					pte = (pte_t *) alloc_bootmem_low_pages(PAGE_SIZE);
157					pmd_populate_kernel(&init_mm, pmd, pte);
158					BUG_ON(pte != pte_offset_kernel(pmd, 0));
159				}
160				vaddr += PMD_SIZE;
161			}
162			k = 0;
163		}
164		j = 0;
165	}
166}
167#endif	/* CONFIG_MMU */
168
169void __init allocate_pgdat(unsigned int nid)
170{
171	unsigned long start_pfn, end_pfn;
172#ifdef CONFIG_NEED_MULTIPLE_NODES
173	unsigned long phys;
174#endif
175
176	get_pfn_range_for_nid(nid, &start_pfn, &end_pfn);
177
178#ifdef CONFIG_NEED_MULTIPLE_NODES
179	phys = __memblock_alloc_base(sizeof(struct pglist_data),
180				SMP_CACHE_BYTES, end_pfn << PAGE_SHIFT);
181	/* Retry with all of system memory */
182	if (!phys)
183		phys = __memblock_alloc_base(sizeof(struct pglist_data),
184					SMP_CACHE_BYTES, memblock_end_of_DRAM());
185	if (!phys)
186		panic("Can't allocate pgdat for node %d\n", nid);
187
188	NODE_DATA(nid) = __va(phys);
189	memset(NODE_DATA(nid), 0, sizeof(struct pglist_data));
190
191	NODE_DATA(nid)->bdata = &bootmem_node_data[nid];
192#endif
193
194	NODE_DATA(nid)->node_start_pfn = start_pfn;
195	NODE_DATA(nid)->node_spanned_pages = end_pfn - start_pfn;
196}
197
198static void __init bootmem_init_one_node(unsigned int nid)
199{
200	unsigned long total_pages, paddr;
201	unsigned long end_pfn;
202	struct pglist_data *p;
203	int i;
204
205	p = NODE_DATA(nid);
206
207	/* Nothing to do.. */
208	if (!p->node_spanned_pages)
209		return;
210
211	end_pfn = p->node_start_pfn + p->node_spanned_pages;
212
213	total_pages = bootmem_bootmap_pages(p->node_spanned_pages);
214
215	paddr = memblock_alloc(total_pages << PAGE_SHIFT, PAGE_SIZE);
216	if (!paddr)
217		panic("Can't allocate bootmap for nid[%d]\n", nid);
218
219	init_bootmem_node(p, paddr >> PAGE_SHIFT, p->node_start_pfn, end_pfn);
220
221	free_bootmem_with_active_regions(nid, end_pfn);
222
223	if (nid == 0) {
224		/* Reserve the sections we're already using. */
225		for (i = 0; i < memblock.reserved.cnt; i++)
226			reserve_bootmem(memblock.reserved.region[i].base,
227					memblock_size_bytes(&memblock.reserved, i),
228					BOOTMEM_DEFAULT);
229	}
230
231	sparse_memory_present_with_active_regions(nid);
232}
233
234static void __init do_init_bootmem(void)
235{
236	int i;
237
238	/* Add active regions with valid PFNs. */
239	for (i = 0; i < memblock.memory.cnt; i++) {
240		unsigned long start_pfn, end_pfn;
241		start_pfn = memblock.memory.region[i].base >> PAGE_SHIFT;
242		end_pfn = start_pfn + memblock_size_pages(&memblock.memory, i);
243		__add_active_range(0, start_pfn, end_pfn);
244	}
245
246	/* All of system RAM sits in node 0 for the non-NUMA case */
247	allocate_pgdat(0);
248	node_set_online(0);
249
250	plat_mem_setup();
251
252	for_each_online_node(i)
253		bootmem_init_one_node(i);
254
255	sparse_init();
256}
257
258static void __init early_reserve_mem(void)
259{
260	unsigned long start_pfn;
261
262	/*
263	 * Partially used pages are not usable - thus
264	 * we are rounding upwards:
265	 */
266	start_pfn = PFN_UP(__pa(_end));
267
268	/*
269	 * Reserve the kernel text and Reserve the bootmem bitmap. We do
270	 * this in two steps (first step was init_bootmem()), because
271	 * this catches the (definitely buggy) case of us accidentally
272	 * initializing the bootmem allocator with an invalid RAM area.
273	 */
274	memblock_reserve(__MEMORY_START + CONFIG_ZERO_PAGE_OFFSET,
275		    (PFN_PHYS(start_pfn) + PAGE_SIZE - 1) -
276		    (__MEMORY_START + CONFIG_ZERO_PAGE_OFFSET));
277
278	/*
279	 * Reserve physical pages below CONFIG_ZERO_PAGE_OFFSET.
280	 */
281	if (CONFIG_ZERO_PAGE_OFFSET != 0)
282		memblock_reserve(__MEMORY_START, CONFIG_ZERO_PAGE_OFFSET);
283
284	/*
285	 * Handle additional early reservations
286	 */
287	check_for_initrd();
288	reserve_crashkernel();
289}
290
291void __init paging_init(void)
292{
293	unsigned long max_zone_pfns[MAX_NR_ZONES];
294	unsigned long vaddr, end;
295	int nid;
296
297	memblock_init();
298
299	sh_mv.mv_mem_init();
300
301	early_reserve_mem();
302
303	memblock_enforce_memory_limit(memory_limit);
304	memblock_analyze();
305
306	memblock_dump_all();
307
308	/*
309	 * Determine low and high memory ranges:
310	 */
311	max_low_pfn = max_pfn = memblock_end_of_DRAM() >> PAGE_SHIFT;
312	min_low_pfn = __MEMORY_START >> PAGE_SHIFT;
313
314	nodes_clear(node_online_map);
315
316	memory_start = (unsigned long)__va(__MEMORY_START);
317	memory_end = memory_start + (memory_limit ?: memblock_phys_mem_size());
318
319	uncached_init();
320	pmb_init();
321	do_init_bootmem();
322	ioremap_fixed_init();
323
324	/* We don't need to map the kernel through the TLB, as
325	 * it is permanatly mapped using P1. So clear the
326	 * entire pgd. */
327	memset(swapper_pg_dir, 0, sizeof(swapper_pg_dir));
328
329	/* Set an initial value for the MMU.TTB so we don't have to
330	 * check for a null value. */
331	set_TTB(swapper_pg_dir);
332
333	/*
334	 * Populate the relevant portions of swapper_pg_dir so that
335	 * we can use the fixmap entries without calling kmalloc.
336	 * pte's will be filled in by __set_fixmap().
337	 */
338	vaddr = __fix_to_virt(__end_of_fixed_addresses - 1) & PMD_MASK;
339	end = (FIXADDR_TOP + PMD_SIZE - 1) & PMD_MASK;
340	page_table_range_init(vaddr, end, swapper_pg_dir);
341
342	kmap_coherent_init();
343
344	memset(max_zone_pfns, 0, sizeof(max_zone_pfns));
345
346	for_each_online_node(nid) {
347		pg_data_t *pgdat = NODE_DATA(nid);
348		unsigned long low, start_pfn;
349
350		start_pfn = pgdat->bdata->node_min_pfn;
351		low = pgdat->bdata->node_low_pfn;
352
353		if (max_zone_pfns[ZONE_NORMAL] < low)
354			max_zone_pfns[ZONE_NORMAL] = low;
355
356		printk("Node %u: start_pfn = 0x%lx, low = 0x%lx\n",
357		       nid, start_pfn, low);
358	}
359
360	free_area_init_nodes(max_zone_pfns);
361}
362
363/*
364 * Early initialization for any I/O MMUs we might have.
365 */
366static void __init iommu_init(void)
367{
368	no_iommu_init();
369}
370
371unsigned int mem_init_done = 0;
372
373void __init mem_init(void)
374{
375	int codesize, datasize, initsize;
376	int nid;
377
378	iommu_init();
379
380	num_physpages = 0;
381	high_memory = NULL;
382
383	for_each_online_node(nid) {
384		pg_data_t *pgdat = NODE_DATA(nid);
385		unsigned long node_pages = 0;
386		void *node_high_memory;
387
388		num_physpages += pgdat->node_present_pages;
389
390		if (pgdat->node_spanned_pages)
391			node_pages = free_all_bootmem_node(pgdat);
392
393		totalram_pages += node_pages;
394
395		node_high_memory = (void *)__va((pgdat->node_start_pfn +
396						 pgdat->node_spanned_pages) <<
397						 PAGE_SHIFT);
398		if (node_high_memory > high_memory)
399			high_memory = node_high_memory;
400	}
401
402	/* Set this up early, so we can take care of the zero page */
403	cpu_cache_init();
404
405	/* clear the zero-page */
406	memset(empty_zero_page, 0, PAGE_SIZE);
407	__flush_wback_region(empty_zero_page, PAGE_SIZE);
408
409	vsyscall_init();
410
411	codesize =  (unsigned long) &_etext - (unsigned long) &_text;
412	datasize =  (unsigned long) &_edata - (unsigned long) &_etext;
413	initsize =  (unsigned long) &__init_end - (unsigned long) &__init_begin;
414
415	printk(KERN_INFO "Memory: %luk/%luk available (%dk kernel code, "
416	       "%dk data, %dk init)\n",
417		nr_free_pages() << (PAGE_SHIFT-10),
418		num_physpages << (PAGE_SHIFT-10),
419		codesize >> 10,
420		datasize >> 10,
421		initsize >> 10);
422
423	printk(KERN_INFO "virtual kernel memory layout:\n"
424		"    fixmap  : 0x%08lx - 0x%08lx   (%4ld kB)\n"
425#ifdef CONFIG_HIGHMEM
426		"    pkmap   : 0x%08lx - 0x%08lx   (%4ld kB)\n"
427#endif
428		"    vmalloc : 0x%08lx - 0x%08lx   (%4ld MB)\n"
429		"    lowmem  : 0x%08lx - 0x%08lx   (%4ld MB) (cached)\n"
430#ifdef CONFIG_UNCACHED_MAPPING
431		"            : 0x%08lx - 0x%08lx   (%4ld MB) (uncached)\n"
432#endif
433		"      .init : 0x%08lx - 0x%08lx   (%4ld kB)\n"
434		"      .data : 0x%08lx - 0x%08lx   (%4ld kB)\n"
435		"      .text : 0x%08lx - 0x%08lx   (%4ld kB)\n",
436		FIXADDR_START, FIXADDR_TOP,
437		(FIXADDR_TOP - FIXADDR_START) >> 10,
438
439#ifdef CONFIG_HIGHMEM
440		PKMAP_BASE, PKMAP_BASE+LAST_PKMAP*PAGE_SIZE,
441		(LAST_PKMAP*PAGE_SIZE) >> 10,
442#endif
443
444		(unsigned long)VMALLOC_START, VMALLOC_END,
445		(VMALLOC_END - VMALLOC_START) >> 20,
446
447		(unsigned long)memory_start, (unsigned long)high_memory,
448		((unsigned long)high_memory - (unsigned long)memory_start) >> 20,
449
450#ifdef CONFIG_UNCACHED_MAPPING
451		uncached_start, uncached_end, uncached_size >> 20,
452#endif
453
454		(unsigned long)&__init_begin, (unsigned long)&__init_end,
455		((unsigned long)&__init_end -
456		 (unsigned long)&__init_begin) >> 10,
457
458		(unsigned long)&_etext, (unsigned long)&_edata,
459		((unsigned long)&_edata - (unsigned long)&_etext) >> 10,
460
461		(unsigned long)&_text, (unsigned long)&_etext,
462		((unsigned long)&_etext - (unsigned long)&_text) >> 10);
463
464	mem_init_done = 1;
465}
466
467void free_initmem(void)
468{
469	unsigned long addr;
470
471	addr = (unsigned long)(&__init_begin);
472	for (; addr < (unsigned long)(&__init_end); addr += PAGE_SIZE) {
473		ClearPageReserved(virt_to_page(addr));
474		init_page_count(virt_to_page(addr));
475		free_page(addr);
476		totalram_pages++;
477	}
478	printk("Freeing unused kernel memory: %ldk freed\n",
479	       ((unsigned long)&__init_end -
480	        (unsigned long)&__init_begin) >> 10);
481}
482
483#ifdef CONFIG_BLK_DEV_INITRD
484void free_initrd_mem(unsigned long start, unsigned long end)
485{
486	unsigned long p;
487	for (p = start; p < end; p += PAGE_SIZE) {
488		ClearPageReserved(virt_to_page(p));
489		init_page_count(virt_to_page(p));
490		free_page(p);
491		totalram_pages++;
492	}
493	printk("Freeing initrd memory: %ldk freed\n", (end - start) >> 10);
494}
495#endif
496
497#ifdef CONFIG_MEMORY_HOTPLUG
498int arch_add_memory(int nid, u64 start, u64 size)
499{
500	pg_data_t *pgdat;
501	unsigned long start_pfn = start >> PAGE_SHIFT;
502	unsigned long nr_pages = size >> PAGE_SHIFT;
503	int ret;
504
505	pgdat = NODE_DATA(nid);
506
507	/* We only have ZONE_NORMAL, so this is easy.. */
508	ret = __add_pages(nid, pgdat->node_zones + ZONE_NORMAL,
509				start_pfn, nr_pages);
510	if (unlikely(ret))
511		printk("%s: Failed, __add_pages() == %d\n", __func__, ret);
512
513	return ret;
514}
515EXPORT_SYMBOL_GPL(arch_add_memory);
516
517#ifdef CONFIG_NUMA
518int memory_add_physaddr_to_nid(u64 addr)
519{
520	/* Node 0 for now.. */
521	return 0;
522}
523EXPORT_SYMBOL_GPL(memory_add_physaddr_to_nid);
524#endif
525
526#endif /* CONFIG_MEMORY_HOTPLUG */
527