Linux-2.6.12-rc2
[linux-flexiantxendom0-natty.git] / arch / sh / kernel / setup.c
1 /* $Id: setup.c,v 1.30 2003/10/13 07:21:19 lethal Exp $
2  *
3  *  linux/arch/sh/kernel/setup.c
4  *
5  *  Copyright (C) 1999  Niibe Yutaka
6  *  Copyright (C) 2002, 2003  Paul Mundt
7  */
8
9 /*
10  * This file handles the architecture-dependent parts of initialization
11  */
12
13 #include <linux/tty.h>
14 #include <linux/ioport.h>
15 #include <linux/init.h>
16 #include <linux/initrd.h>
17 #include <linux/bootmem.h>
18 #include <linux/console.h>
19 #include <linux/seq_file.h>
20 #include <linux/root_dev.h>
21 #include <linux/utsname.h>
22 #include <linux/cpu.h>
23 #include <asm/uaccess.h>
24 #include <asm/io.h>
25 #include <asm/io_generic.h>
26 #include <asm/sections.h>
27 #include <asm/irq.h>
28 #include <asm/setup.h>
29
30 #ifdef CONFIG_SH_KGDB
31 #include <asm/kgdb.h>
32 static int kgdb_parse_options(char *options);
33 #endif
34 extern void * __rd_start, * __rd_end;
35 /*
36  * Machine setup..
37  */
38
39 /*
40  * Initialize loops_per_jiffy as 10000000 (1000MIPS).
41  * This value will be used at the very early stage of serial setup.
42  * The bigger value means no problem.
43  */
44 struct sh_cpuinfo boot_cpu_data = { CPU_SH_NONE, 0, 10000000, };
45 struct screen_info screen_info;
46
47 #if defined(CONFIG_SH_UNKNOWN)
48 struct sh_machine_vector sh_mv;
49 #endif
50
51 /* We need this to satisfy some external references. */
52 struct screen_info screen_info = {
53         0, 25,                  /* orig-x, orig-y */
54         0,                      /* unused */
55         0,                      /* orig-video-page */
56         0,                      /* orig-video-mode */
57         80,                     /* orig-video-cols */
58         0,0,0,                  /* ega_ax, ega_bx, ega_cx */
59         25,                     /* orig-video-lines */
60         0,                      /* orig-video-isVGA */
61         16                      /* orig-video-points */
62 };
63
64 extern void platform_setup(void);
65 extern char *get_system_type(void);
66 extern int root_mountflags;
67
68 #define MV_NAME_SIZE 32
69
70 static struct sh_machine_vector* __init get_mv_byname(const char* name);
71
72 /*
73  * This is set up by the setup-routine at boot-time
74  */
75 #define PARAM   ((unsigned char *)empty_zero_page)
76
77 #define MOUNT_ROOT_RDONLY (*(unsigned long *) (PARAM+0x000))
78 #define RAMDISK_FLAGS (*(unsigned long *) (PARAM+0x004))
79 #define ORIG_ROOT_DEV (*(unsigned long *) (PARAM+0x008))
80 #define LOADER_TYPE (*(unsigned long *) (PARAM+0x00c))
81 #define INITRD_START (*(unsigned long *) (PARAM+0x010))
82 #define INITRD_SIZE (*(unsigned long *) (PARAM+0x014))
83 /* ... */
84 #define COMMAND_LINE ((char *) (PARAM+0x100))
85
86 #define RAMDISK_IMAGE_START_MASK        0x07FF
87 #define RAMDISK_PROMPT_FLAG             0x8000
88 #define RAMDISK_LOAD_FLAG               0x4000  
89
90 static char command_line[COMMAND_LINE_SIZE] = { 0, };
91
92 struct resource standard_io_resources[] = {
93         { "dma1", 0x00, 0x1f },
94         { "pic1", 0x20, 0x3f },
95         { "timer", 0x40, 0x5f },
96         { "keyboard", 0x60, 0x6f },
97         { "dma page reg", 0x80, 0x8f },
98         { "pic2", 0xa0, 0xbf },
99         { "dma2", 0xc0, 0xdf },
100         { "fpu", 0xf0, 0xff }
101 };
102
103 #define STANDARD_IO_RESOURCES (sizeof(standard_io_resources)/sizeof(struct resource))
104
105 /* System RAM - interrupted by the 640kB-1M hole */
106 #define code_resource (ram_resources[3])
107 #define data_resource (ram_resources[4])
108 static struct resource ram_resources[] = {
109         { "System RAM", 0x000000, 0x09ffff, IORESOURCE_BUSY },
110         { "System RAM", 0x100000, 0x100000, IORESOURCE_BUSY },
111         { "Video RAM area", 0x0a0000, 0x0bffff },
112         { "Kernel code", 0x100000, 0 },
113         { "Kernel data", 0, 0 }
114 };
115
116 unsigned long memory_start, memory_end;
117
118 static inline void parse_cmdline (char ** cmdline_p, char mv_name[MV_NAME_SIZE],
119                                   struct sh_machine_vector** mvp,
120                                   unsigned long *mv_io_base,
121                                   int *mv_mmio_enable)
122 {
123         char c = ' ', *to = command_line, *from = COMMAND_LINE;
124         int len = 0;
125
126         /* Save unparsed command line copy for /proc/cmdline */
127         memcpy(saved_command_line, COMMAND_LINE, COMMAND_LINE_SIZE);
128         saved_command_line[COMMAND_LINE_SIZE-1] = '\0';
129
130         memory_start = (unsigned long)PAGE_OFFSET+__MEMORY_START;
131         memory_end = memory_start + __MEMORY_SIZE;
132
133         for (;;) {
134                 /*
135                  * "mem=XXX[kKmM]" defines a size of memory.
136                  */
137                 if (c == ' ' && !memcmp(from, "mem=", 4)) {
138                         if (to != command_line)
139                                 to--;
140                         {
141                                 unsigned long mem_size;
142
143                                 mem_size = memparse(from+4, &from);
144                                 memory_end = memory_start + mem_size;
145                         }
146                 }
147                 if (c == ' ' && !memcmp(from, "sh_mv=", 6)) {
148                         char* mv_end;
149                         char* mv_comma;
150                         int mv_len;
151                         if (to != command_line)
152                                 to--;
153                         from += 6;
154                         mv_end = strchr(from, ' ');
155                         if (mv_end == NULL)
156                                 mv_end = from + strlen(from);
157
158                         mv_comma = strchr(from, ',');
159                         if ((mv_comma != NULL) && (mv_comma < mv_end)) {
160                                 int ints[3];
161                                 get_options(mv_comma+1, ARRAY_SIZE(ints), ints);
162                                 *mv_io_base = ints[1];
163                                 *mv_mmio_enable = ints[2];
164                                 mv_len = mv_comma - from;
165                         } else {
166                                 mv_len = mv_end - from;
167                         }
168                         if (mv_len > (MV_NAME_SIZE-1))
169                                 mv_len = MV_NAME_SIZE-1;
170                         memcpy(mv_name, from, mv_len);
171                         mv_name[mv_len] = '\0';
172                         from = mv_end;
173
174                         *mvp = get_mv_byname(mv_name);
175                 }
176                 c = *(from++);
177                 if (!c)
178                         break;
179                 if (COMMAND_LINE_SIZE <= ++len)
180                         break;
181                 *(to++) = c;
182         }
183         *to = '\0';
184         *cmdline_p = command_line;
185 }
186
187 static int __init sh_mv_setup(char **cmdline_p)
188 {
189 #if defined(CONFIG_SH_UNKNOWN)
190         extern struct sh_machine_vector mv_unknown;
191 #endif
192         struct sh_machine_vector *mv = NULL;
193         char mv_name[MV_NAME_SIZE] = "";
194         unsigned long mv_io_base = 0;
195         int mv_mmio_enable = 0;
196
197         parse_cmdline(cmdline_p, mv_name, &mv, &mv_io_base, &mv_mmio_enable);
198
199 #ifdef CONFIG_SH_GENERIC
200         if (mv == NULL) {
201                 mv = &mv_unknown;
202                 if (*mv_name != '\0') {
203                         printk("Warning: Unsupported machine %s, using unknown\n",
204                                mv_name);
205                 }
206         }
207         sh_mv = *mv;
208 #endif
209 #ifdef CONFIG_SH_UNKNOWN
210         sh_mv = mv_unknown;
211 #endif
212
213         /*
214          * Manually walk the vec, fill in anything that the board hasn't yet
215          * by hand, wrapping to the generic implementation.
216          */
217 #define mv_set(elem) do { \
218         if (!sh_mv.mv_##elem) \
219                 sh_mv.mv_##elem = generic_##elem; \
220 } while (0)
221
222         mv_set(inb);    mv_set(inw);    mv_set(inl);
223         mv_set(outb);   mv_set(outw);   mv_set(outl);
224
225         mv_set(inb_p);  mv_set(inw_p);  mv_set(inl_p);
226         mv_set(outb_p); mv_set(outw_p); mv_set(outl_p);
227
228         mv_set(insb);   mv_set(insw);   mv_set(insl);
229         mv_set(outsb);  mv_set(outsw);  mv_set(outsl);
230
231         mv_set(readb);  mv_set(readw);  mv_set(readl);
232         mv_set(writeb); mv_set(writew); mv_set(writel);
233
234         mv_set(ioremap);
235         mv_set(iounmap);
236
237         mv_set(isa_port2addr);
238         mv_set(irq_demux);
239
240 #ifdef CONFIG_SH_UNKNOWN
241         __set_io_port_base(mv_io_base);
242 #endif
243
244         return 0;
245 }
246
247 void __init setup_arch(char **cmdline_p)
248 {
249         unsigned long bootmap_size;
250         unsigned long start_pfn, max_pfn, max_low_pfn;
251
252 #ifdef CONFIG_EARLY_PRINTK
253         extern void enable_early_printk(void);
254
255         enable_early_printk();
256 #endif
257 #ifdef CONFIG_CMDLINE_BOOL
258         strcpy(COMMAND_LINE, CONFIG_CMDLINE);
259 #endif
260
261         ROOT_DEV = old_decode_dev(ORIG_ROOT_DEV);
262
263 #ifdef CONFIG_BLK_DEV_RAM
264         rd_image_start = RAMDISK_FLAGS & RAMDISK_IMAGE_START_MASK;
265         rd_prompt = ((RAMDISK_FLAGS & RAMDISK_PROMPT_FLAG) != 0);
266         rd_doload = ((RAMDISK_FLAGS & RAMDISK_LOAD_FLAG) != 0);
267 #endif
268
269         if (!MOUNT_ROOT_RDONLY)
270                 root_mountflags &= ~MS_RDONLY;
271         init_mm.start_code = (unsigned long) _text;
272         init_mm.end_code = (unsigned long) _etext;
273         init_mm.end_data = (unsigned long) _edata;
274         init_mm.brk = (unsigned long) _end;
275
276         code_resource.start = virt_to_bus(_text);
277         code_resource.end = virt_to_bus(_etext)-1;
278         data_resource.start = virt_to_bus(_etext);
279         data_resource.end = virt_to_bus(_edata)-1;
280
281         sh_mv_setup(cmdline_p);
282
283 #define PFN_UP(x)       (((x) + PAGE_SIZE-1) >> PAGE_SHIFT)
284 #define PFN_DOWN(x)     ((x) >> PAGE_SHIFT)
285 #define PFN_PHYS(x)     ((x) << PAGE_SHIFT)
286
287 #ifdef CONFIG_DISCONTIGMEM
288         NODE_DATA(0)->bdata = &discontig_node_bdata[0];
289         NODE_DATA(1)->bdata = &discontig_node_bdata[1];
290
291         bootmap_size = init_bootmem_node(NODE_DATA(1), 
292                                          PFN_UP(__MEMORY_START_2ND),
293                                          PFN_UP(__MEMORY_START_2ND),
294                                          PFN_DOWN(__MEMORY_START_2ND+__MEMORY_SIZE_2ND));
295         free_bootmem_node(NODE_DATA(1), __MEMORY_START_2ND, __MEMORY_SIZE_2ND);
296         reserve_bootmem_node(NODE_DATA(1), __MEMORY_START_2ND, bootmap_size);
297 #endif
298
299         /*
300          * Find the highest page frame number we have available
301          */
302         max_pfn = PFN_DOWN(__pa(memory_end));
303
304         /*
305          * Determine low and high memory ranges:
306          */
307         max_low_pfn = max_pfn;
308
309         /*
310          * Partially used pages are not usable - thus
311          * we are rounding upwards:
312          */
313         start_pfn = PFN_UP(__pa(_end));
314
315         /*
316          * Find a proper area for the bootmem bitmap. After this
317          * bootstrap step all allocations (until the page allocator
318          * is intact) must be done via bootmem_alloc().
319          */
320         bootmap_size = init_bootmem_node(NODE_DATA(0), start_pfn,
321                                          __MEMORY_START>>PAGE_SHIFT,
322                                          max_low_pfn);
323         /*
324          * Register fully available low RAM pages with the bootmem allocator.
325          */
326         {
327                 unsigned long curr_pfn, last_pfn, pages;
328
329                 /*
330                  * We are rounding up the start address of usable memory:
331                  */
332                 curr_pfn = PFN_UP(__MEMORY_START);
333                 /*
334                  * ... and at the end of the usable range downwards:
335                  */
336                 last_pfn = PFN_DOWN(__pa(memory_end));
337
338                 if (last_pfn > max_low_pfn)
339                         last_pfn = max_low_pfn;
340
341                 pages = last_pfn - curr_pfn;
342                 free_bootmem_node(NODE_DATA(0), PFN_PHYS(curr_pfn),
343                                   PFN_PHYS(pages));
344         }
345
346         /*
347          * Reserve the kernel text and
348          * Reserve the bootmem bitmap. We do this in two steps (first step
349          * was init_bootmem()), because this catches the (definitely buggy)
350          * case of us accidentally initializing the bootmem allocator with
351          * an invalid RAM area.
352          */
353         reserve_bootmem_node(NODE_DATA(0), __MEMORY_START+PAGE_SIZE,
354                 (PFN_PHYS(start_pfn)+bootmap_size+PAGE_SIZE-1)-__MEMORY_START);
355
356         /*
357          * reserve physical page 0 - it's a special BIOS page on many boxes,
358          * enabling clean reboots, SMP operation, laptop functions.
359          */
360         reserve_bootmem_node(NODE_DATA(0), __MEMORY_START, PAGE_SIZE);
361
362 #ifdef CONFIG_BLK_DEV_INITRD
363         ROOT_DEV = MKDEV(RAMDISK_MAJOR, 0);
364         if (&__rd_start != &__rd_end) {
365                 LOADER_TYPE = 1;
366                 INITRD_START = PHYSADDR((unsigned long)&__rd_start) - __MEMORY_START;
367                 INITRD_SIZE = (unsigned long)&__rd_end - (unsigned long)&__rd_start;
368         }
369
370         if (LOADER_TYPE && INITRD_START) {
371                 if (INITRD_START + INITRD_SIZE <= (max_low_pfn << PAGE_SHIFT)) {
372                         reserve_bootmem_node(NODE_DATA(0), INITRD_START+__MEMORY_START, INITRD_SIZE);
373                         initrd_start =
374                                 INITRD_START ? INITRD_START + PAGE_OFFSET + __MEMORY_START : 0;
375                         initrd_end = initrd_start + INITRD_SIZE;
376                 } else {
377                         printk("initrd extends beyond end of memory "
378                             "(0x%08lx > 0x%08lx)\ndisabling initrd\n",
379                                     INITRD_START + INITRD_SIZE,
380                                     max_low_pfn << PAGE_SHIFT);
381                         initrd_start = 0;
382                 }
383         }
384 #endif
385
386 #ifdef CONFIG_DUMMY_CONSOLE
387         conswitchp = &dummy_con;
388 #endif
389
390         /* Perform the machine specific initialisation */
391         platform_setup();
392
393         paging_init();
394 }
395
396 struct sh_machine_vector* __init get_mv_byname(const char* name)
397 {
398         extern int strcasecmp(const char *, const char *);
399         extern long __machvec_start, __machvec_end;
400         struct sh_machine_vector *all_vecs =
401                 (struct sh_machine_vector *)&__machvec_start;
402
403         int i, n = ((unsigned long)&__machvec_end
404                     - (unsigned long)&__machvec_start)/
405                 sizeof(struct sh_machine_vector);
406
407         for (i = 0; i < n; ++i) {
408                 struct sh_machine_vector *mv = &all_vecs[i];
409                 if (mv == NULL)
410                         continue;
411                 if (strcasecmp(name, get_system_type()) == 0) {
412                         return mv;
413                 }
414         }
415         return NULL;
416 }
417
418 static struct cpu cpu[NR_CPUS];
419
420 static int __init topology_init(void)
421 {
422         int cpu_id;
423
424         for (cpu_id = 0; cpu_id < NR_CPUS; cpu_id++)
425                 if (cpu_possible(cpu_id))
426                         register_cpu(&cpu[cpu_id], cpu_id, NULL);
427
428         return 0;
429 }
430
431 subsys_initcall(topology_init);
432
433 static const char *cpu_name[] = {
434         [CPU_SH7604]    = "SH7604",
435         [CPU_SH7705]    = "SH7705",
436         [CPU_SH7708]    = "SH7708",
437         [CPU_SH7729]    = "SH7729",
438         [CPU_SH7300]    = "SH7300",
439         [CPU_SH7750]    = "SH7750",
440         [CPU_SH7750S]   = "SH7750S",
441         [CPU_SH7750R]   = "SH7750R",
442         [CPU_SH7751]    = "SH7751",
443         [CPU_SH7751R]   = "SH7751R",
444         [CPU_SH7760]    = "SH7760",
445         [CPU_SH73180]   = "SH73180",
446         [CPU_ST40RA]    = "ST40RA",
447         [CPU_ST40GX1]   = "ST40GX1",
448         [CPU_SH4_202]   = "SH4-202",
449         [CPU_SH4_501]   = "SH4-501",
450         [CPU_SH_NONE]   = "Unknown"
451 };
452
453 const char *get_cpu_subtype(void)
454 {
455         return cpu_name[boot_cpu_data.type];
456 }
457
458 #ifdef CONFIG_PROC_FS
459 static const char *cpu_flags[] = {
460         "none", "fpu", "p2flush", "mmuassoc", "dsp", "perfctr",
461 };
462
463 static void show_cpuflags(struct seq_file *m)
464 {
465         unsigned long i;
466
467         seq_printf(m, "cpu flags\t:");
468
469         if (!cpu_data->flags) {
470                 seq_printf(m, " %s\n", cpu_flags[0]);
471                 return;
472         }
473
474         for (i = 0; i < cpu_data->flags; i++)
475                 if ((cpu_data->flags & (1 << i)))
476                         seq_printf(m, " %s", cpu_flags[i+1]);
477
478         seq_printf(m, "\n");
479 }
480
481 static void show_cacheinfo(struct seq_file *m, const char *type, struct cache_info info)
482 {
483         unsigned int cache_size;
484
485         cache_size = info.ways * info.sets * info.linesz;
486
487         seq_printf(m, "%s size\t: %dKiB\n", type, cache_size >> 10);
488 }
489
490 /*
491  *      Get CPU information for use by the procfs.
492  */
493 static int show_cpuinfo(struct seq_file *m, void *v)
494 {
495         unsigned int cpu = smp_processor_id();
496
497         if (!cpu && cpu_online(cpu))
498                 seq_printf(m, "machine\t\t: %s\n", get_system_type());
499
500         seq_printf(m, "processor\t: %d\n", cpu);
501         seq_printf(m, "cpu family\t: %s\n", system_utsname.machine);
502         seq_printf(m, "cpu type\t: %s\n", get_cpu_subtype());
503
504         show_cpuflags(m);
505
506         seq_printf(m, "cache type\t: ");
507
508         /*
509          * Check for what type of cache we have, we support both the
510          * unified cache on the SH-2 and SH-3, as well as the harvard
511          * style cache on the SH-4.
512          */
513         if (test_bit(SH_CACHE_COMBINED, &(boot_cpu_data.icache.flags))) {
514                 seq_printf(m, "unified\n");
515                 show_cacheinfo(m, "cache", boot_cpu_data.icache);
516         } else {
517                 seq_printf(m, "split (harvard)\n");
518                 show_cacheinfo(m, "icache", boot_cpu_data.icache);
519                 show_cacheinfo(m, "dcache", boot_cpu_data.dcache);
520         }
521
522         seq_printf(m, "bogomips\t: %lu.%02lu\n",
523                      boot_cpu_data.loops_per_jiffy/(500000/HZ),
524                      (boot_cpu_data.loops_per_jiffy/(5000/HZ)) % 100);
525
526 #define PRINT_CLOCK(name, value) \
527         seq_printf(m, name " clock\t: %d.%02dMHz\n", \
528                      ((value) / 1000000), ((value) % 1000000)/10000)
529         
530         PRINT_CLOCK("cpu", boot_cpu_data.cpu_clock);
531         PRINT_CLOCK("bus", boot_cpu_data.bus_clock);
532 #ifdef CONFIG_CPU_SUBTYPE_ST40STB1
533         PRINT_CLOCK("memory", boot_cpu_data.memory_clock);
534 #endif
535         PRINT_CLOCK("module", boot_cpu_data.module_clock);
536
537         return 0;
538 }
539
540
541 static void *c_start(struct seq_file *m, loff_t *pos)
542 {
543         return *pos < NR_CPUS ? cpu_data + *pos : NULL;
544 }
545 static void *c_next(struct seq_file *m, void *v, loff_t *pos)
546 {
547         ++*pos;
548         return c_start(m, pos);
549 }
550 static void c_stop(struct seq_file *m, void *v)
551 {
552 }
553 struct seq_operations cpuinfo_op = {
554         .start  = c_start,
555         .next   = c_next,
556         .stop   = c_stop,
557         .show   = show_cpuinfo,
558 };
559 #endif /* CONFIG_PROC_FS */
560
561 #ifdef CONFIG_SH_KGDB
562 /*
563  * Parse command-line kgdb options.  By default KGDB is enabled,
564  * entered on error (or other action) using default serial info.
565  * The command-line option can include a serial port specification
566  * and an action to override default or configured behavior.
567  */
568 struct kgdb_sermap kgdb_sci_sermap =
569 { "ttySC", 5, kgdb_sci_setup, NULL };
570
571 struct kgdb_sermap *kgdb_serlist = &kgdb_sci_sermap;
572 struct kgdb_sermap *kgdb_porttype = &kgdb_sci_sermap;
573
574 void kgdb_register_sermap(struct kgdb_sermap *map)
575 {
576         struct kgdb_sermap *last;
577
578         for (last = kgdb_serlist; last->next; last = last->next)
579                 ;
580         last->next = map;
581         if (!map->namelen) {
582                 map->namelen = strlen(map->name);
583         }
584 }
585
586 static int __init kgdb_parse_options(char *options)
587 {
588         char c;
589         int baud;
590
591         /* Check for port spec (or use default) */
592
593         /* Determine port type and instance */
594         if (!memcmp(options, "tty", 3)) {
595                 struct kgdb_sermap *map = kgdb_serlist;
596
597                 while (map && memcmp(options, map->name, map->namelen))
598                         map = map->next;
599
600                 if (!map) {
601                         KGDB_PRINTK("unknown port spec in %s\n", options);
602                         return -1;
603                 }
604
605                 kgdb_porttype = map;
606                 kgdb_serial_setup = map->setup_fn;
607                 kgdb_portnum = options[map->namelen] - '0';
608                 options += map->namelen + 1;
609
610                 options = (*options == ',') ? options+1 : options;
611                 
612                 /* Read optional parameters (baud/parity/bits) */
613                 baud = simple_strtoul(options, &options, 10);
614                 if (baud != 0) {
615                         kgdb_baud = baud;
616
617                         c = toupper(*options);
618                         if (c == 'E' || c == 'O' || c == 'N') {
619                                 kgdb_parity = c;
620                                 options++;
621                         }
622
623                         c = *options;
624                         if (c == '7' || c == '8') {
625                                 kgdb_bits = c;
626                                 options++;
627                         }
628                         options = (*options == ',') ? options+1 : options;
629                 }
630         }
631
632         /* Check for action specification */
633         if (!memcmp(options, "halt", 4)) {
634                 kgdb_halt = 1;
635                 options += 4;
636         } else if (!memcmp(options, "disabled", 8)) {
637                 kgdb_enabled = 0;
638                 options += 8;
639         }
640
641         if (*options) {
642                 KGDB_PRINTK("ignored unknown options: %s\n", options);
643                 return 0;
644         }
645         return 1;
646 }
647 __setup("kgdb=", kgdb_parse_options);
648 #endif /* CONFIG_SH_KGDB */
649