arch/sparc/kernel/setup_64.c

   1 /*
   2  *  linux/arch/sparc64/kernel/setup.c
   3  *
   4  *  Copyright (C) 1995,1996  David S. Miller (davem@caip.rutgers.edu)
   5  *  Copyright (C) 1997       Jakub Jelinek (jj@sunsite.mff.cuni.cz)
   6  */
   7
   8 #include <linux/errno.h>
   9 #include <linux/sched.h>
  10 #include <linux/kernel.h>
  11 #include <linux/mm.h>
  12 #include <linux/stddef.h>
  13 #include <linux/unistd.h>
  14 #include <linux/ptrace.h>
  15 #include <asm/smp.h>
  16 #include <linux/user.h>
  17 #include <linux/screen_info.h>
  18 #include <linux/delay.h>
  19 #include <linux/fs.h>
  20 #include <linux/seq_file.h>
  21 #include <linux/syscalls.h>
  22 #include <linux/kdev_t.h>
  23 #include <linux/major.h>
  24 #include <linux/string.h>
  25 #include <linux/init.h>
  26 #include <linux/inet.h>
  27 #include <linux/console.h>
  28 #include <linux/root_dev.h>
  29 #include <linux/interrupt.h>
  30 #include <linux/cpu.h>
  31 #include <linux/initrd.h>
  32 #include <linux/module.h>
  33
  34 #include <asm/system.h>
  35 #include <asm/io.h>
  36 #include <asm/processor.h>
  37 #include <asm/oplib.h>
  38 #include <asm/page.h>
  39 #include <asm/pgtable.h>
  40 #include <asm/idprom.h>
  41 #include <asm/head.h>
  42 #include <asm/starfire.h>
  43 #include <asm/mmu_context.h>
  44 #include <asm/timer.h>
  45 #include <asm/sections.h>
  46 #include <asm/setup.h>
  47 #include <asm/mmu.h>
  48 #include <asm/ns87303.h>
  49 #include <asm/btext.h>
  50 #include <asm/elf.h>
  51 #include <asm/mdesc.h>
  52
  53 #ifdef CONFIG_IP_PNP
  54 #include <net/ipconfig.h>
  55 #endif
  56
  57 #include "entry.h"
  58 #include "kernel.h"
  59
  60 /* Used to synchronize accesses to NatSemi SUPER I/O chip configure
  61  * operations in asm/ns87303.h
  62  */
  63 DEFINE_SPINLOCK(ns87303_lock);
  64 EXPORT_SYMBOL(ns87303_lock);
  65
  66 struct screen_info screen_info = {
  67         0, 0,                   /* orig-x, orig-y */
  68         0,                      /* unused */
  69         0,                      /* orig-video-page */
  70         0,                      /* orig-video-mode */
  71         128,                    /* orig-video-cols */
  72         0, 0, 0,                /* unused, ega_bx, unused */
  73         54,                     /* orig-video-lines */
  74         0,                      /* orig-video-isVGA */
  75         16                      /* orig-video-points */
  76 };
  77
  78 static void
  79 prom_console_write(struct console *con, const char *s, unsigned n)
  80 {
  81         prom_write(s, n);
  82 }
  83
  84 /* Exported for mm/init.c:paging_init. */
  85 unsigned long cmdline_memory_size = 0;
  86
  87 static struct console prom_early_console = {
  88         .name =         "earlyprom",
  89         .write =        prom_console_write,
  90         .flags =        CON_PRINTBUFFER | CON_BOOT | CON_ANYTIME,
  91         .index =        -1,
  92 };
  93
  94 /*
  95  * Process kernel command line switches that are specific to the
  96  * SPARC or that require special low-level processing.
  97  */
  98 static void __init process_switch(char c)
  99 {
 100         switch (c) {
 101         case 'd':
 102         case 's':
 103                 break;
 104         case 'h':
 105                 prom_printf("boot_flags_init: Halt!\n");
 106                 prom_halt();
 107                 break;
 108         case 'p':
 109                 prom_early_console.flags &= ~CON_BOOT;
 110                 break;
 111         case 'P':
 112                 /* Force UltraSPARC-III P-Cache on. */
 113                 if (tlb_type != cheetah) {
 114                         printk("BOOT: Ignoring P-Cache force option.\n");
 115                         break;
 116                 }
 117                 cheetah_pcache_forced_on = 1;
 118                 add_taint(TAINT_MACHINE_CHECK);
 119                 cheetah_enable_pcache();
 120                 break;
 121
 122         default:
 123                 printk("Unknown boot switch (-%c)\n", c);
 124                 break;
 125         }
 126 }
 127
 128 static void __init boot_flags_init(char *commands)
 129 {
 130         while (*commands) {
 131                 /* Move to the start of the next "argument". */
 132                 while (*commands && *commands == ' ')
 133                         commands++;
 134
 135                 /* Process any command switches, otherwise skip it. */
 136                 if (*commands == '\0')
 137                         break;
 138                 if (*commands == '-') {
 139                         commands++;
 140                         while (*commands && *commands != ' ')
 141                                 process_switch(*commands++);
 142                         continue;
 143                 }
 144                 if (!strncmp(commands, "mem=", 4)) {
 145                         /*
 146                          * "mem=XXX[kKmM]" overrides the PROM-reported
 147                          * memory size.
 148                          */
 149                         cmdline_memory_size = simple_strtoul(commands + 4,
 150                                                              &commands, 0);
 151                         if (*commands == 'K' || *commands == 'k') {
 152                                 cmdline_memory_size <<= 10;
 153                                 commands++;
 154                         } else if (*commands=='M' || *commands=='m') {
 155                                 cmdline_memory_size <<= 20;
 156                                 commands++;
 157                         }
 158                 }
 159                 while (*commands && *commands != ' ')
 160                         commands++;
 161         }
 162 }
 163
 164 extern unsigned short root_flags;
 165 extern unsigned short root_dev;
 166 extern unsigned short ram_flags;
 167 #define RAMDISK_IMAGE_START_MASK        0x07FF
 168 #define RAMDISK_PROMPT_FLAG             0x8000
 169 #define RAMDISK_LOAD_FLAG               0x4000
 170
 171 extern int root_mountflags;
 172
 173 char reboot_command[COMMAND_LINE_SIZE];
 174
 175 static struct pt_regs fake_swapper_regs = { { 0, }, 0, 0, 0, 0 };
 176
 177 void __init per_cpu_patch(void)
 178 {
 179         struct cpuid_patch_entry *p;
 180         unsigned long ver;
 181         int is_jbus;
 182
 183         if (tlb_type == spitfire && !this_is_starfire)
 184                 return;
 185
 186         is_jbus = 0;
 187         if (tlb_type != hypervisor) {
 188                 __asm__ ("rdpr %%ver, %0" : "=r" (ver));
 189                 is_jbus = ((ver >> 32UL) == __JALAPENO_ID ||
 190                            (ver >> 32UL) == __SERRANO_ID);
 191         }
 192
 193         p = &__cpuid_patch;
 194         while (p < &__cpuid_patch_end) {
 195                 unsigned long addr = p->addr;
 196                 unsigned int *insns;
 197
 198                 switch (tlb_type) {
 199                 case spitfire:
 200                         insns = &p->starfire[0];
 201                         break;
 202                 case cheetah:
 203                 case cheetah_plus:
 204                         if (is_jbus)
 205                                 insns = &p->cheetah_jbus[0];
 206                         else
 207                                 insns = &p->cheetah_safari[0];
 208                         break;
 209                 case hypervisor:
 210                         insns = &p->sun4v[0];
 211                         break;
 212                 default:
 213                         prom_printf("Unknown cpu type, halting.\n");
 214                         prom_halt();
 215                 }
 216
 217                 *(unsigned int *) (addr +  0) = insns[0];
 218                 wmb();
 219                 __asm__ __volatile__("flush     %0" : : "r" (addr +  0));
 220
 221                 *(unsigned int *) (addr +  4) = insns[1];
 222                 wmb();
 223                 __asm__ __volatile__("flush     %0" : : "r" (addr +  4));
 224
 225                 *(unsigned int *) (addr +  8) = insns[2];
 226                 wmb();
 227                 __asm__ __volatile__("flush     %0" : : "r" (addr +  8));
 228
 229                 *(unsigned int *) (addr + 12) = insns[3];
 230                 wmb();
 231                 __asm__ __volatile__("flush     %0" : : "r" (addr + 12));
 232
 233                 p++;
 234         }
 235 }
 236
 237 void sun4v_patch_1insn_range(struct sun4v_1insn_patch_entry *start,
 238                              struct sun4v_1insn_patch_entry *end)
 239 {
 240         while (start < end) {
 241                 unsigned long addr = start->addr;
 242
 243                 *(unsigned int *) (addr +  0) = start->insn;
 244                 wmb();
 245                 __asm__ __volatile__("flush     %0" : : "r" (addr +  0));
 246
 247                 start++;
 248         }
 249 }
 250
 251 void sun4v_patch_2insn_range(struct sun4v_2insn_patch_entry *start,
 252                              struct sun4v_2insn_patch_entry *end)
 253 {
 254         while (start < end) {
 255                 unsigned long addr = start->addr;
 256
 257                 *(unsigned int *) (addr +  0) = start->insns[0];
 258                 wmb();
 259                 __asm__ __volatile__("flush     %0" : : "r" (addr +  0));
 260
 261                 *(unsigned int *) (addr +  4) = start->insns[1];
 262                 wmb();
 263                 __asm__ __volatile__("flush     %0" : : "r" (addr +  4));
 264
 265                 start++;
 266         }
 267 }
 268
 269 void __init sun4v_patch(void)
 270 {
 271         extern void sun4v_hvapi_init(void);
 272
 273         if (tlb_type != hypervisor)
 274                 return;
 275
 276         sun4v_patch_1insn_range(&__sun4v_1insn_patch,
 277                                 &__sun4v_1insn_patch_end);
 278
 279         sun4v_patch_2insn_range(&__sun4v_2insn_patch,
 280                                 &__sun4v_2insn_patch_end);
 281
 282         sun4v_hvapi_init();
 283 }
 284
 285 static void __init popc_patch(void)
 286 {
 287         struct popc_3insn_patch_entry *p3;
 288         struct popc_6insn_patch_entry *p6;
 289
 290         p3 = &__popc_3insn_patch;
 291         while (p3 < &__popc_3insn_patch_end) {
 292                 unsigned long i, addr = p3->addr;
 293
 294                 for (i = 0; i < 3; i++) {
 295                         *(unsigned int *) (addr +  (i * 4)) = p3->insns[i];
 296                         wmb();
 297                         __asm__ __volatile__("flush     %0"
 298                                              : : "r" (addr +  (i * 4)));
 299                 }
 300
 301                 p3++;
 302         }
 303
 304         p6 = &__popc_6insn_patch;
 305         while (p6 < &__popc_6insn_patch_end) {
 306                 unsigned long i, addr = p6->addr;
 307
 308                 for (i = 0; i < 6; i++) {
 309                         *(unsigned int *) (addr +  (i * 4)) = p6->insns[i];
 310                         wmb();
 311                         __asm__ __volatile__("flush     %0"
 312                                              : : "r" (addr +  (i * 4)));
 313                 }
 314
 315                 p6++;
 316         }
 317 }
 318
 319 #ifdef CONFIG_SMP
 320 void __init boot_cpu_id_too_large(int cpu)
 321 {
 322         prom_printf("Serious problem, boot cpu id (%d) >= NR_CPUS (%d)\n",
 323                     cpu, NR_CPUS);
 324         prom_halt();
 325 }
 326 #endif
 327
 328 /* On Ultra, we support all of the v8 capabilities. */
 329 unsigned long sparc64_elf_hwcap = (HWCAP_SPARC_FLUSH | HWCAP_SPARC_STBAR |
 330                                    HWCAP_SPARC_SWAP | HWCAP_SPARC_MULDIV |
 331                                    HWCAP_SPARC_V9);
 332 EXPORT_SYMBOL(sparc64_elf_hwcap);
 333
 334 static const char *hwcaps[] = {
 335         "flush", "stbar", "swap", "muldiv", "v9",
 336         "ultra3", "blkinit", "n2",
 337
 338         /* These strings are as they appear in the machine description
 339          * 'hwcap-list' property for cpu nodes.
 340          */
 341         "mul32", "div32", "fsmuld", "v8plus", "popc", "vis", "vis2",
 342         "ASIBlkInit", "fmaf", "vis3", "hpc", "random", "trans", "fjfmau",
 343         "ima", "cspare",
 344 };
 345
 346 void cpucap_info(struct seq_file *m)
 347 {
 348         unsigned long caps = sparc64_elf_hwcap;
 349         int i, printed = 0;
 350
 351         seq_puts(m, "cpucaps\t\t: ");
 352         for (i = 0; i < ARRAY_SIZE(hwcaps); i++) {
 353                 unsigned long bit = 1UL << i;
 354                 if (caps & bit) {
 355                         seq_printf(m, "%s%s",
 356                                    printed ? "," : "", hwcaps[i]);
 357                         printed++;
 358                 }
 359         }
 360         seq_putc(m, '\n');
 361 }
 362
 363 static void __init report_hwcaps(unsigned long caps)
 364 {
 365         int i, printed = 0;
 366
 367         printk(KERN_INFO "CPU CAPS: [");
 368         for (i = 0; i < ARRAY_SIZE(hwcaps); i++) {
 369                 unsigned long bit = 1UL << i;
 370                 if (caps & bit) {
 371                         printk(KERN_CONT "%s%s",
 372                                printed ? "," : "", hwcaps[i]);
 373                         if (++printed == 8) {
 374                                 printk(KERN_CONT "]\n");
 375                                 printk(KERN_INFO "CPU CAPS: [");
 376                                 printed = 0;
 377                         }
 378                 }
 379         }
 380         printk(KERN_CONT "]\n");
 381 }
 382
 383 static unsigned long __init mdesc_cpu_hwcap_list(void)
 384 {
 385         struct mdesc_handle *hp;
 386         unsigned long caps = 0;
 387         const char *prop;
 388         int len;
 389         u64 pn;
 390
 391         hp = mdesc_grab();
 392         if (!hp)
 393                 return 0;
 394
 395         pn = mdesc_node_by_name(hp, MDESC_NODE_NULL, "cpu");
 396         if (pn == MDESC_NODE_NULL)
 397                 goto out;
 398
 399         prop = mdesc_get_property(hp, pn, "hwcap-list", &len);
 400         if (!prop)
 401                 goto out;
 402
 403         while (len) {
 404                 int i, plen;
 405
 406                 for (i = 0; i < ARRAY_SIZE(hwcaps); i++) {
 407                         unsigned long bit = 1UL << i;
 408
 409                         if (!strcmp(prop, hwcaps[i])) {
 410                                 caps |= bit;
 411                                 break;
 412                         }
 413                 }
 414
 415                 plen = strlen(prop) + 1;
 416                 prop += plen;
 417                 len -= plen;
 418         }
 419
 420 out:
 421         mdesc_release(hp);
 422         return caps;
 423 }
 424
 425 /* This yields a mask that user programs can use to figure out what
 426  * instruction set this cpu supports.
 427  */
 428 static void __init init_sparc64_elf_hwcap(void)
 429 {
 430         unsigned long cap = sparc64_elf_hwcap;
 431         unsigned long mdesc_caps;
 432
 433         if (tlb_type == cheetah || tlb_type == cheetah_plus)
 434                 cap |= HWCAP_SPARC_ULTRA3;
 435         else if (tlb_type == hypervisor) {
 436                 if (sun4v_chip_type == SUN4V_CHIP_NIAGARA1 ||
 437                     sun4v_chip_type == SUN4V_CHIP_NIAGARA2 ||
 438                     sun4v_chip_type == SUN4V_CHIP_NIAGARA3 ||
 439                     sun4v_chip_type == SUN4V_CHIP_NIAGARA4 ||
 440                     sun4v_chip_type == SUN4V_CHIP_NIAGARA5)
 441                         cap |= HWCAP_SPARC_BLKINIT;
 442                 if (sun4v_chip_type == SUN4V_CHIP_NIAGARA2 ||
 443                     sun4v_chip_type == SUN4V_CHIP_NIAGARA3 ||
 444                     sun4v_chip_type == SUN4V_CHIP_NIAGARA4 ||
 445                     sun4v_chip_type == SUN4V_CHIP_NIAGARA5)
 446                         cap |= HWCAP_SPARC_N2;
 447         }
 448
 449         cap |= (AV_SPARC_MUL32 | AV_SPARC_DIV32 | AV_SPARC_V8PLUS);
 450
 451         mdesc_caps = mdesc_cpu_hwcap_list();
 452         if (!mdesc_caps) {
 453                 if (tlb_type == spitfire)
 454                         cap |= AV_SPARC_VIS;
 455                 if (tlb_type == cheetah || tlb_type == cheetah_plus)
 456                         cap |= AV_SPARC_VIS | AV_SPARC_VIS2;
 457                 if (tlb_type == cheetah_plus) {
 458                         unsigned long impl, ver;
 459
 460                         __asm__ __volatile__("rdpr %%ver, %0" : "=r" (ver));
 461                         impl = ((ver >> 32) & 0xffff);
 462                         if (impl == PANTHER_IMPL)
 463                                 cap |= AV_SPARC_POPC;
 464                 }
 465                 if (tlb_type == hypervisor) {
 466                         if (sun4v_chip_type == SUN4V_CHIP_NIAGARA1)
 467                                 cap |= AV_SPARC_ASI_BLK_INIT;
 468                         if (sun4v_chip_type == SUN4V_CHIP_NIAGARA2 ||
 469                             sun4v_chip_type == SUN4V_CHIP_NIAGARA3 ||
 470                             sun4v_chip_type == SUN4V_CHIP_NIAGARA4 ||
 471                             sun4v_chip_type == SUN4V_CHIP_NIAGARA5)
 472                                 cap |= (AV_SPARC_VIS | AV_SPARC_VIS2 |
 473                                         AV_SPARC_ASI_BLK_INIT |
 474                                         AV_SPARC_POPC);
 475                         if (sun4v_chip_type == SUN4V_CHIP_NIAGARA3 ||
 476                             sun4v_chip_type == SUN4V_CHIP_NIAGARA4 ||
 477                             sun4v_chip_type == SUN4V_CHIP_NIAGARA5)
 478                                 cap |= (AV_SPARC_VIS3 | AV_SPARC_HPC |
 479                                         AV_SPARC_FMAF);
 480                 }
 481         }
 482         sparc64_elf_hwcap = cap | mdesc_caps;
 483
 484         report_hwcaps(sparc64_elf_hwcap);
 485
 486         if (sparc64_elf_hwcap & AV_SPARC_POPC)
 487                 popc_patch();
 488 }
 489
 490 void __init setup_arch(char **cmdline_p)
 491 {
 492         /* Initialize PROM console and command line. */
 493         *cmdline_p = prom_getbootargs();
 494         strcpy(boot_command_line, *cmdline_p);
 495         parse_early_param();
 496
 497         boot_flags_init(*cmdline_p);
 498 #ifdef CONFIG_EARLYFB
 499         if (btext_find_display())
 500 #endif
 501                 register_console(&prom_early_console);
 502
 503         if (tlb_type == hypervisor)
 504                 printk("ARCH: SUN4V\n");
 505         else
 506                 printk("ARCH: SUN4U\n");
 507
 508 #ifdef CONFIG_DUMMY_CONSOLE
 509         conswitchp = &dummy_con;
 510 #endif
 511
 512         idprom_init();
 513
 514         if (!root_flags)
 515                 root_mountflags &= ~MS_RDONLY;
 516         ROOT_DEV = old_decode_dev(root_dev);
 517 #ifdef CONFIG_BLK_DEV_RAM
 518         rd_image_start = ram_flags & RAMDISK_IMAGE_START_MASK;
 519         rd_prompt = ((ram_flags & RAMDISK_PROMPT_FLAG) != 0);
 520         rd_doload = ((ram_flags & RAMDISK_LOAD_FLAG) != 0);
 521 #endif
 522
 523         task_thread_info(&init_task)->kregs = &fake_swapper_regs;
 524
 525 #ifdef CONFIG_IP_PNP
 526         if (!ic_set_manually) {
 527                 phandle chosen = prom_finddevice("/chosen");
 528                 u32 cl, sv, gw;
 529
 530                 cl = prom_getintdefault (chosen, "client-ip", 0);
 531                 sv = prom_getintdefault (chosen, "server-ip", 0);
 532                 gw = prom_getintdefault (chosen, "gateway-ip", 0);
 533                 if (cl && sv) {
 534                         ic_myaddr = cl;
 535                         ic_servaddr = sv;
 536                         if (gw)
 537                                 ic_gateway = gw;
 538 #if defined(CONFIG_IP_PNP_BOOTP) || defined(CONFIG_IP_PNP_RARP)
 539                         ic_proto_enabled = 0;
 540 #endif
 541                 }
 542         }
 543 #endif
 544
 545         /* Get boot processor trap_block[] setup.  */
 546         init_cur_cpu_trap(current_thread_info());
 547
 548         paging_init();
 549         init_sparc64_elf_hwcap();
 550 }
 551
 552 extern int stop_a_enabled;
 553
 554 void sun_do_break(void)
 555 {
 556         if (!stop_a_enabled)
 557                 return;
 558
 559         prom_printf("\n");
 560         flush_user_windows();
 561
 562         prom_cmdline();
 563 }
 564 EXPORT_SYMBOL(sun_do_break);
 565
 566 int stop_a_enabled = 1;
 567 EXPORT_SYMBOL(stop_a_enabled);