Merge branches 'fixes' and 'misc' into for-linus
[pandora-kernel.git] / arch / arm / mm / init.c
1 /*
2  *  linux/arch/arm/mm/init.c
3  *
4  *  Copyright (C) 1995-2005 Russell King
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License version 2 as
8  * published by the Free Software Foundation.
9  */
10 #include <linux/kernel.h>
11 #include <linux/errno.h>
12 #include <linux/swap.h>
13 #include <linux/init.h>
14 #include <linux/bootmem.h>
15 #include <linux/mman.h>
16 #include <linux/export.h>
17 #include <linux/nodemask.h>
18 #include <linux/initrd.h>
19 #include <linux/of_fdt.h>
20 #include <linux/highmem.h>
21 #include <linux/gfp.h>
22 #include <linux/memblock.h>
23 #include <linux/dma-contiguous.h>
24 #include <linux/sizes.h>
25
26 #include <asm/mach-types.h>
27 #include <asm/memblock.h>
28 #include <asm/prom.h>
29 #include <asm/sections.h>
30 #include <asm/setup.h>
31 #include <asm/tlb.h>
32 #include <asm/fixmap.h>
33
34 #include <asm/mach/arch.h>
35 #include <asm/mach/map.h>
36
37 #include "mm.h"
38
39 static phys_addr_t phys_initrd_start __initdata = 0;
40 static unsigned long phys_initrd_size __initdata = 0;
41
42 static int __init early_initrd(char *p)
43 {
44         phys_addr_t start;
45         unsigned long size;
46         char *endp;
47
48         start = memparse(p, &endp);
49         if (*endp == ',') {
50                 size = memparse(endp + 1, NULL);
51
52                 phys_initrd_start = start;
53                 phys_initrd_size = size;
54         }
55         return 0;
56 }
57 early_param("initrd", early_initrd);
58
59 static int __init parse_tag_initrd(const struct tag *tag)
60 {
61         printk(KERN_WARNING "ATAG_INITRD is deprecated; "
62                 "please update your bootloader.\n");
63         phys_initrd_start = __virt_to_phys(tag->u.initrd.start);
64         phys_initrd_size = tag->u.initrd.size;
65         return 0;
66 }
67
68 __tagtable(ATAG_INITRD, parse_tag_initrd);
69
70 static int __init parse_tag_initrd2(const struct tag *tag)
71 {
72         phys_initrd_start = tag->u.initrd.start;
73         phys_initrd_size = tag->u.initrd.size;
74         return 0;
75 }
76
77 __tagtable(ATAG_INITRD2, parse_tag_initrd2);
78
79 /*
80  * This keeps memory configuration data used by a couple memory
81  * initialization functions, as well as show_mem() for the skipping
82  * of holes in the memory map.  It is populated by arm_add_memory().
83  */
84 struct meminfo meminfo;
85
86 void show_mem(unsigned int filter)
87 {
88         int free = 0, total = 0, reserved = 0;
89         int shared = 0, cached = 0, slab = 0, i;
90         struct meminfo * mi = &meminfo;
91
92         printk("Mem-info:\n");
93         show_free_areas(filter);
94
95         for_each_bank (i, mi) {
96                 struct membank *bank = &mi->bank[i];
97                 unsigned int pfn1, pfn2;
98                 struct page *page, *end;
99
100                 pfn1 = bank_pfn_start(bank);
101                 pfn2 = bank_pfn_end(bank);
102
103                 page = pfn_to_page(pfn1);
104                 end  = pfn_to_page(pfn2 - 1) + 1;
105
106                 do {
107                         total++;
108                         if (PageReserved(page))
109                                 reserved++;
110                         else if (PageSwapCache(page))
111                                 cached++;
112                         else if (PageSlab(page))
113                                 slab++;
114                         else if (!page_count(page))
115                                 free++;
116                         else
117                                 shared += page_count(page) - 1;
118                         page++;
119                 } while (page < end);
120         }
121
122         printk("%d pages of RAM\n", total);
123         printk("%d free pages\n", free);
124         printk("%d reserved pages\n", reserved);
125         printk("%d slab pages\n", slab);
126         printk("%d pages shared\n", shared);
127         printk("%d pages swap cached\n", cached);
128 }
129
130 static void __init find_limits(unsigned long *min, unsigned long *max_low,
131                                unsigned long *max_high)
132 {
133         struct meminfo *mi = &meminfo;
134         int i;
135
136         /* This assumes the meminfo array is properly sorted */
137         *min = bank_pfn_start(&mi->bank[0]);
138         for_each_bank (i, mi)
139                 if (mi->bank[i].highmem)
140                                 break;
141         *max_low = bank_pfn_end(&mi->bank[i - 1]);
142         *max_high = bank_pfn_end(&mi->bank[mi->nr_banks - 1]);
143 }
144
145 #ifdef CONFIG_ZONE_DMA
146
147 phys_addr_t arm_dma_zone_size __read_mostly;
148 EXPORT_SYMBOL(arm_dma_zone_size);
149
150 /*
151  * The DMA mask corresponding to the maximum bus address allocatable
152  * using GFP_DMA.  The default here places no restriction on DMA
153  * allocations.  This must be the smallest DMA mask in the system,
154  * so a successful GFP_DMA allocation will always satisfy this.
155  */
156 phys_addr_t arm_dma_limit;
157 unsigned long arm_dma_pfn_limit;
158
159 static void __init arm_adjust_dma_zone(unsigned long *size, unsigned long *hole,
160         unsigned long dma_size)
161 {
162         if (size[0] <= dma_size)
163                 return;
164
165         size[ZONE_NORMAL] = size[0] - dma_size;
166         size[ZONE_DMA] = dma_size;
167         hole[ZONE_NORMAL] = hole[0];
168         hole[ZONE_DMA] = 0;
169 }
170 #endif
171
172 void __init setup_dma_zone(const struct machine_desc *mdesc)
173 {
174 #ifdef CONFIG_ZONE_DMA
175         if (mdesc->dma_zone_size) {
176                 arm_dma_zone_size = mdesc->dma_zone_size;
177                 arm_dma_limit = PHYS_OFFSET + arm_dma_zone_size - 1;
178         } else
179                 arm_dma_limit = 0xffffffff;
180         arm_dma_pfn_limit = arm_dma_limit >> PAGE_SHIFT;
181 #endif
182 }
183
184 static void __init zone_sizes_init(unsigned long min, unsigned long max_low,
185         unsigned long max_high)
186 {
187         unsigned long zone_size[MAX_NR_ZONES], zhole_size[MAX_NR_ZONES];
188         struct memblock_region *reg;
189
190         /*
191          * initialise the zones.
192          */
193         memset(zone_size, 0, sizeof(zone_size));
194
195         /*
196          * The memory size has already been determined.  If we need
197          * to do anything fancy with the allocation of this memory
198          * to the zones, now is the time to do it.
199          */
200         zone_size[0] = max_low - min;
201 #ifdef CONFIG_HIGHMEM
202         zone_size[ZONE_HIGHMEM] = max_high - max_low;
203 #endif
204
205         /*
206          * Calculate the size of the holes.
207          *  holes = node_size - sum(bank_sizes)
208          */
209         memcpy(zhole_size, zone_size, sizeof(zhole_size));
210         for_each_memblock(memory, reg) {
211                 unsigned long start = memblock_region_memory_base_pfn(reg);
212                 unsigned long end = memblock_region_memory_end_pfn(reg);
213
214                 if (start < max_low) {
215                         unsigned long low_end = min(end, max_low);
216                         zhole_size[0] -= low_end - start;
217                 }
218 #ifdef CONFIG_HIGHMEM
219                 if (end > max_low) {
220                         unsigned long high_start = max(start, max_low);
221                         zhole_size[ZONE_HIGHMEM] -= end - high_start;
222                 }
223 #endif
224         }
225
226 #ifdef CONFIG_ZONE_DMA
227         /*
228          * Adjust the sizes according to any special requirements for
229          * this machine type.
230          */
231         if (arm_dma_zone_size)
232                 arm_adjust_dma_zone(zone_size, zhole_size,
233                         arm_dma_zone_size >> PAGE_SHIFT);
234 #endif
235
236         free_area_init_node(0, zone_size, min, zhole_size);
237 }
238
239 #ifdef CONFIG_HAVE_ARCH_PFN_VALID
240 int pfn_valid(unsigned long pfn)
241 {
242         return memblock_is_memory(__pfn_to_phys(pfn));
243 }
244 EXPORT_SYMBOL(pfn_valid);
245 #endif
246
247 #ifndef CONFIG_SPARSEMEM
248 static void __init arm_memory_present(void)
249 {
250 }
251 #else
252 static void __init arm_memory_present(void)
253 {
254         struct memblock_region *reg;
255
256         for_each_memblock(memory, reg)
257                 memory_present(0, memblock_region_memory_base_pfn(reg),
258                                memblock_region_memory_end_pfn(reg));
259 }
260 #endif
261
262 static bool arm_memblock_steal_permitted = true;
263
264 phys_addr_t __init arm_memblock_steal(phys_addr_t size, phys_addr_t align)
265 {
266         phys_addr_t phys;
267
268         BUG_ON(!arm_memblock_steal_permitted);
269
270         phys = memblock_alloc_base(size, align, MEMBLOCK_ALLOC_ANYWHERE);
271         memblock_free(phys, size);
272         memblock_remove(phys, size);
273
274         return phys;
275 }
276
277 void __init arm_memblock_init(struct meminfo *mi,
278         const struct machine_desc *mdesc)
279 {
280         int i;
281
282         for (i = 0; i < mi->nr_banks; i++)
283                 memblock_add(mi->bank[i].start, mi->bank[i].size);
284
285         /* Register the kernel text, kernel data and initrd with memblock. */
286 #ifdef CONFIG_XIP_KERNEL
287         memblock_reserve(__pa(_sdata), _end - _sdata);
288 #else
289         memblock_reserve(__pa(_stext), _end - _stext);
290 #endif
291 #ifdef CONFIG_BLK_DEV_INITRD
292         /* FDT scan will populate initrd_start */
293         if (initrd_start && !phys_initrd_size) {
294                 phys_initrd_start = __virt_to_phys(initrd_start);
295                 phys_initrd_size = initrd_end - initrd_start;
296         }
297         initrd_start = initrd_end = 0;
298         if (phys_initrd_size &&
299             !memblock_is_region_memory(phys_initrd_start, phys_initrd_size)) {
300                 pr_err("INITRD: 0x%08llx+0x%08lx is not a memory region - disabling initrd\n",
301                        (u64)phys_initrd_start, phys_initrd_size);
302                 phys_initrd_start = phys_initrd_size = 0;
303         }
304         if (phys_initrd_size &&
305             memblock_is_region_reserved(phys_initrd_start, phys_initrd_size)) {
306                 pr_err("INITRD: 0x%08llx+0x%08lx overlaps in-use memory region - disabling initrd\n",
307                        (u64)phys_initrd_start, phys_initrd_size);
308                 phys_initrd_start = phys_initrd_size = 0;
309         }
310         if (phys_initrd_size) {
311                 memblock_reserve(phys_initrd_start, phys_initrd_size);
312
313                 /* Now convert initrd to virtual addresses */
314                 initrd_start = __phys_to_virt(phys_initrd_start);
315                 initrd_end = initrd_start + phys_initrd_size;
316         }
317 #endif
318
319         arm_mm_memblock_reserve();
320         arm_dt_memblock_reserve();
321
322         /* reserve any platform specific memblock areas */
323         if (mdesc->reserve)
324                 mdesc->reserve();
325
326         /*
327          * reserve memory for DMA contigouos allocations,
328          * must come from DMA area inside low memory
329          */
330         dma_contiguous_reserve(min(arm_dma_limit, arm_lowmem_limit));
331
332         arm_memblock_steal_permitted = false;
333         memblock_dump_all();
334 }
335
336 void __init bootmem_init(void)
337 {
338         unsigned long min, max_low, max_high;
339
340         memblock_allow_resize();
341         max_low = max_high = 0;
342
343         find_limits(&min, &max_low, &max_high);
344
345         /*
346          * Sparsemem tries to allocate bootmem in memory_present(),
347          * so must be done after the fixed reservations
348          */
349         arm_memory_present();
350
351         /*
352          * sparse_init() needs the bootmem allocator up and running.
353          */
354         sparse_init();
355
356         /*
357          * Now free the memory - free_area_init_node needs
358          * the sparse mem_map arrays initialized by sparse_init()
359          * for memmap_init_zone(), otherwise all PFNs are invalid.
360          */
361         zone_sizes_init(min, max_low, max_high);
362
363         /*
364          * This doesn't seem to be used by the Linux memory manager any
365          * more, but is used by ll_rw_block.  If we can get rid of it, we
366          * also get rid of some of the stuff above as well.
367          */
368         min_low_pfn = min;
369         max_low_pfn = max_low;
370         max_pfn = max_high;
371 }
372
373 /*
374  * Poison init memory with an undefined instruction (ARM) or a branch to an
375  * undefined instruction (Thumb).
376  */
377 static inline void poison_init_mem(void *s, size_t count)
378 {
379         u32 *p = (u32 *)s;
380         for (; count != 0; count -= 4)
381                 *p++ = 0xe7fddef0;
382 }
383
384 static inline void
385 free_memmap(unsigned long start_pfn, unsigned long end_pfn)
386 {
387         struct page *start_pg, *end_pg;
388         phys_addr_t pg, pgend;
389
390         /*
391          * Convert start_pfn/end_pfn to a struct page pointer.
392          */
393         start_pg = pfn_to_page(start_pfn - 1) + 1;
394         end_pg = pfn_to_page(end_pfn - 1) + 1;
395
396         /*
397          * Convert to physical addresses, and
398          * round start upwards and end downwards.
399          */
400         pg = PAGE_ALIGN(__pa(start_pg));
401         pgend = __pa(end_pg) & PAGE_MASK;
402
403         /*
404          * If there are free pages between these,
405          * free the section of the memmap array.
406          */
407         if (pg < pgend)
408                 memblock_free_early(pg, pgend - pg);
409 }
410
411 /*
412  * The mem_map array can get very big.  Free the unused area of the memory map.
413  */
414 static void __init free_unused_memmap(struct meminfo *mi)
415 {
416         unsigned long bank_start, prev_bank_end = 0;
417         unsigned int i;
418
419         /*
420          * This relies on each bank being in address order.
421          * The banks are sorted previously in bootmem_init().
422          */
423         for_each_bank(i, mi) {
424                 struct membank *bank = &mi->bank[i];
425
426                 bank_start = bank_pfn_start(bank);
427
428 #ifdef CONFIG_SPARSEMEM
429                 /*
430                  * Take care not to free memmap entries that don't exist
431                  * due to SPARSEMEM sections which aren't present.
432                  */
433                 bank_start = min(bank_start,
434                                  ALIGN(prev_bank_end, PAGES_PER_SECTION));
435 #else
436                 /*
437                  * Align down here since the VM subsystem insists that the
438                  * memmap entries are valid from the bank start aligned to
439                  * MAX_ORDER_NR_PAGES.
440                  */
441                 bank_start = round_down(bank_start, MAX_ORDER_NR_PAGES);
442 #endif
443                 /*
444                  * If we had a previous bank, and there is a space
445                  * between the current bank and the previous, free it.
446                  */
447                 if (prev_bank_end && prev_bank_end < bank_start)
448                         free_memmap(prev_bank_end, bank_start);
449
450                 /*
451                  * Align up here since the VM subsystem insists that the
452                  * memmap entries are valid from the bank end aligned to
453                  * MAX_ORDER_NR_PAGES.
454                  */
455                 prev_bank_end = ALIGN(bank_pfn_end(bank), MAX_ORDER_NR_PAGES);
456         }
457
458 #ifdef CONFIG_SPARSEMEM
459         if (!IS_ALIGNED(prev_bank_end, PAGES_PER_SECTION))
460                 free_memmap(prev_bank_end,
461                             ALIGN(prev_bank_end, PAGES_PER_SECTION));
462 #endif
463 }
464
465 #ifdef CONFIG_HIGHMEM
466 static inline void free_area_high(unsigned long pfn, unsigned long end)
467 {
468         for (; pfn < end; pfn++)
469                 free_highmem_page(pfn_to_page(pfn));
470 }
471 #endif
472
473 static void __init free_highpages(void)
474 {
475 #ifdef CONFIG_HIGHMEM
476         unsigned long max_low = max_low_pfn;
477         struct memblock_region *mem, *res;
478
479         /* set highmem page free */
480         for_each_memblock(memory, mem) {
481                 unsigned long start = memblock_region_memory_base_pfn(mem);
482                 unsigned long end = memblock_region_memory_end_pfn(mem);
483
484                 /* Ignore complete lowmem entries */
485                 if (end <= max_low)
486                         continue;
487
488                 /* Truncate partial highmem entries */
489                 if (start < max_low)
490                         start = max_low;
491
492                 /* Find and exclude any reserved regions */
493                 for_each_memblock(reserved, res) {
494                         unsigned long res_start, res_end;
495
496                         res_start = memblock_region_reserved_base_pfn(res);
497                         res_end = memblock_region_reserved_end_pfn(res);
498
499                         if (res_end < start)
500                                 continue;
501                         if (res_start < start)
502                                 res_start = start;
503                         if (res_start > end)
504                                 res_start = end;
505                         if (res_end > end)
506                                 res_end = end;
507                         if (res_start != start)
508                                 free_area_high(start, res_start);
509                         start = res_end;
510                         if (start == end)
511                                 break;
512                 }
513
514                 /* And now free anything which remains */
515                 if (start < end)
516                         free_area_high(start, end);
517         }
518 #endif
519 }
520
521 /*
522  * mem_init() marks the free areas in the mem_map and tells us how much
523  * memory is free.  This is done after various parts of the system have
524  * claimed their memory after the kernel image.
525  */
526 void __init mem_init(void)
527 {
528 #ifdef CONFIG_HAVE_TCM
529         /* These pointers are filled in on TCM detection */
530         extern u32 dtcm_end;
531         extern u32 itcm_end;
532 #endif
533
534         set_max_mapnr(pfn_to_page(max_pfn) - mem_map);
535
536         /* this will put all unused low memory onto the freelists */
537         free_unused_memmap(&meminfo);
538         free_all_bootmem();
539
540 #ifdef CONFIG_SA1111
541         /* now that our DMA memory is actually so designated, we can free it */
542         free_reserved_area(__va(PHYS_OFFSET), swapper_pg_dir, -1, NULL);
543 #endif
544
545         free_highpages();
546
547         mem_init_print_info(NULL);
548
549 #define MLK(b, t) b, t, ((t) - (b)) >> 10
550 #define MLM(b, t) b, t, ((t) - (b)) >> 20
551 #define MLK_ROUNDUP(b, t) b, t, DIV_ROUND_UP(((t) - (b)), SZ_1K)
552
553         printk(KERN_NOTICE "Virtual kernel memory layout:\n"
554                         "    vector  : 0x%08lx - 0x%08lx   (%4ld kB)\n"
555 #ifdef CONFIG_HAVE_TCM
556                         "    DTCM    : 0x%08lx - 0x%08lx   (%4ld kB)\n"
557                         "    ITCM    : 0x%08lx - 0x%08lx   (%4ld kB)\n"
558 #endif
559                         "    fixmap  : 0x%08lx - 0x%08lx   (%4ld kB)\n"
560                         "    vmalloc : 0x%08lx - 0x%08lx   (%4ld MB)\n"
561                         "    lowmem  : 0x%08lx - 0x%08lx   (%4ld MB)\n"
562 #ifdef CONFIG_HIGHMEM
563                         "    pkmap   : 0x%08lx - 0x%08lx   (%4ld MB)\n"
564 #endif
565 #ifdef CONFIG_MODULES
566                         "    modules : 0x%08lx - 0x%08lx   (%4ld MB)\n"
567 #endif
568                         "      .text : 0x%p" " - 0x%p" "   (%4d kB)\n"
569                         "      .init : 0x%p" " - 0x%p" "   (%4d kB)\n"
570                         "      .data : 0x%p" " - 0x%p" "   (%4d kB)\n"
571                         "       .bss : 0x%p" " - 0x%p" "   (%4d kB)\n",
572
573                         MLK(UL(CONFIG_VECTORS_BASE), UL(CONFIG_VECTORS_BASE) +
574                                 (PAGE_SIZE)),
575 #ifdef CONFIG_HAVE_TCM
576                         MLK(DTCM_OFFSET, (unsigned long) dtcm_end),
577                         MLK(ITCM_OFFSET, (unsigned long) itcm_end),
578 #endif
579                         MLK(FIXADDR_START, FIXADDR_TOP),
580                         MLM(VMALLOC_START, VMALLOC_END),
581                         MLM(PAGE_OFFSET, (unsigned long)high_memory),
582 #ifdef CONFIG_HIGHMEM
583                         MLM(PKMAP_BASE, (PKMAP_BASE) + (LAST_PKMAP) *
584                                 (PAGE_SIZE)),
585 #endif
586 #ifdef CONFIG_MODULES
587                         MLM(MODULES_VADDR, MODULES_END),
588 #endif
589
590                         MLK_ROUNDUP(_text, _etext),
591                         MLK_ROUNDUP(__init_begin, __init_end),
592                         MLK_ROUNDUP(_sdata, _edata),
593                         MLK_ROUNDUP(__bss_start, __bss_stop));
594
595 #undef MLK
596 #undef MLM
597 #undef MLK_ROUNDUP
598
599         /*
600          * Check boundaries twice: Some fundamental inconsistencies can
601          * be detected at build time already.
602          */
603 #ifdef CONFIG_MMU
604         BUILD_BUG_ON(TASK_SIZE                          > MODULES_VADDR);
605         BUG_ON(TASK_SIZE                                > MODULES_VADDR);
606 #endif
607
608 #ifdef CONFIG_HIGHMEM
609         BUILD_BUG_ON(PKMAP_BASE + LAST_PKMAP * PAGE_SIZE > PAGE_OFFSET);
610         BUG_ON(PKMAP_BASE + LAST_PKMAP * PAGE_SIZE      > PAGE_OFFSET);
611 #endif
612
613         if (PAGE_SIZE >= 16384 && get_num_physpages() <= 128) {
614                 extern int sysctl_overcommit_memory;
615                 /*
616                  * On a machine this small we won't get
617                  * anywhere without overcommit, so turn
618                  * it on by default.
619                  */
620                 sysctl_overcommit_memory = OVERCOMMIT_ALWAYS;
621         }
622 }
623
624 void free_initmem(void)
625 {
626 #ifdef CONFIG_HAVE_TCM
627         extern char __tcm_start, __tcm_end;
628
629         poison_init_mem(&__tcm_start, &__tcm_end - &__tcm_start);
630         free_reserved_area(&__tcm_start, &__tcm_end, -1, "TCM link");
631 #endif
632
633         poison_init_mem(__init_begin, __init_end - __init_begin);
634         if (!machine_is_integrator() && !machine_is_cintegrator())
635                 free_initmem_default(-1);
636 }
637
638 #ifdef CONFIG_BLK_DEV_INITRD
639
640 static int keep_initrd;
641
642 void free_initrd_mem(unsigned long start, unsigned long end)
643 {
644         if (!keep_initrd) {
645                 poison_init_mem((void *)start, PAGE_ALIGN(end) - start);
646                 free_reserved_area((void *)start, (void *)end, -1, "initrd");
647         }
648 }
649
650 static int __init keepinitrd_setup(char *__unused)
651 {
652         keep_initrd = 1;
653         return 1;
654 }
655
656 __setup("keepinitrd", keepinitrd_setup);
657 #endif