arch/sh/kernel/setup.c

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