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 #include <linux/start_kernel.h>
34
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 #include <asm/cacheflush.h>
53
54 #ifdef CONFIG_IP_PNP
55 #include <net/ipconfig.h>
56 #endif
57
58 #include "entry.h"
59 #include "kernel.h"
60
61 /* Used to synchronize accesses to NatSemi SUPER I/O chip configure
62 * operations in asm/ns87303.h
63 */
64 DEFINE_SPINLOCK(ns87303_lock);
65 EXPORT_SYMBOL(ns87303_lock);
66
67 struct screen_info screen_info = {
68 0, 0, /* orig-x, orig-y */
69 0, /* unused */
70 0, /* orig-video-page */
71 0, /* orig-video-mode */
72 128, /* orig-video-cols */
73 0, 0, 0, /* unused, ega_bx, unused */
74 54, /* orig-video-lines */
75 0, /* orig-video-isVGA */
76 16 /* orig-video-points */
77 };
78
79 static void
prom_console_write(struct console * con,const char * s,unsigned n)80 prom_console_write(struct console *con, const char *s, unsigned n)
81 {
82 prom_write(s, n);
83 }
84
85 /* Exported for mm/init.c:paging_init. */
86 unsigned long cmdline_memory_size = 0;
87
88 static struct console prom_early_console = {
89 .name = "earlyprom",
90 .write = prom_console_write,
91 .flags = CON_PRINTBUFFER | CON_BOOT | CON_ANYTIME,
92 .index = -1,
93 };
94
95 /*
96 * Process kernel command line switches that are specific to the
97 * SPARC or that require special low-level processing.
98 */
process_switch(char c)99 static void __init process_switch(char c)
100 {
101 switch (c) {
102 case 'd':
103 case 's':
104 break;
105 case 'h':
106 prom_printf("boot_flags_init: Halt!\n");
107 prom_halt();
108 break;
109 case 'p':
110 prom_early_console.flags &= ~CON_BOOT;
111 break;
112 case 'P':
113 /* Force UltraSPARC-III P-Cache on. */
114 if (tlb_type != cheetah) {
115 printk("BOOT: Ignoring P-Cache force option.\n");
116 break;
117 }
118 cheetah_pcache_forced_on = 1;
119 add_taint(TAINT_MACHINE_CHECK, LOCKDEP_NOW_UNRELIABLE);
120 cheetah_enable_pcache();
121 break;
122
123 default:
124 printk("Unknown boot switch (-%c)\n", c);
125 break;
126 }
127 }
128
boot_flags_init(char * commands)129 static void __init boot_flags_init(char *commands)
130 {
131 while (*commands) {
132 /* Move to the start of the next "argument". */
133 while (*commands && *commands == ' ')
134 commands++;
135
136 /* Process any command switches, otherwise skip it. */
137 if (*commands == '\0')
138 break;
139 if (*commands == '-') {
140 commands++;
141 while (*commands && *commands != ' ')
142 process_switch(*commands++);
143 continue;
144 }
145 if (!strncmp(commands, "mem=", 4))
146 cmdline_memory_size = memparse(commands + 4, &commands);
147
148 while (*commands && *commands != ' ')
149 commands++;
150 }
151 }
152
153 extern unsigned short root_flags;
154 extern unsigned short root_dev;
155 extern unsigned short ram_flags;
156 #define RAMDISK_IMAGE_START_MASK 0x07FF
157 #define RAMDISK_PROMPT_FLAG 0x8000
158 #define RAMDISK_LOAD_FLAG 0x4000
159
160 extern int root_mountflags;
161
162 char reboot_command[COMMAND_LINE_SIZE];
163
164 static struct pt_regs fake_swapper_regs = { { 0, }, 0, 0, 0, 0 };
165
per_cpu_patch(void)166 static void __init per_cpu_patch(void)
167 {
168 struct cpuid_patch_entry *p;
169 unsigned long ver;
170 int is_jbus;
171
172 if (tlb_type == spitfire && !this_is_starfire)
173 return;
174
175 is_jbus = 0;
176 if (tlb_type != hypervisor) {
177 __asm__ ("rdpr %%ver, %0" : "=r" (ver));
178 is_jbus = ((ver >> 32UL) == __JALAPENO_ID ||
179 (ver >> 32UL) == __SERRANO_ID);
180 }
181
182 p = &__cpuid_patch;
183 while (p < &__cpuid_patch_end) {
184 unsigned long addr = p->addr;
185 unsigned int *insns;
186
187 switch (tlb_type) {
188 case spitfire:
189 insns = &p->starfire[0];
190 break;
191 case cheetah:
192 case cheetah_plus:
193 if (is_jbus)
194 insns = &p->cheetah_jbus[0];
195 else
196 insns = &p->cheetah_safari[0];
197 break;
198 case hypervisor:
199 insns = &p->sun4v[0];
200 break;
201 default:
202 prom_printf("Unknown cpu type, halting.\n");
203 prom_halt();
204 }
205
206 *(unsigned int *) (addr + 0) = insns[0];
207 wmb();
208 __asm__ __volatile__("flush %0" : : "r" (addr + 0));
209
210 *(unsigned int *) (addr + 4) = insns[1];
211 wmb();
212 __asm__ __volatile__("flush %0" : : "r" (addr + 4));
213
214 *(unsigned int *) (addr + 8) = insns[2];
215 wmb();
216 __asm__ __volatile__("flush %0" : : "r" (addr + 8));
217
218 *(unsigned int *) (addr + 12) = insns[3];
219 wmb();
220 __asm__ __volatile__("flush %0" : : "r" (addr + 12));
221
222 p++;
223 }
224 }
225
sun4v_patch_1insn_range(struct sun4v_1insn_patch_entry * start,struct sun4v_1insn_patch_entry * end)226 void sun4v_patch_1insn_range(struct sun4v_1insn_patch_entry *start,
227 struct sun4v_1insn_patch_entry *end)
228 {
229 while (start < end) {
230 unsigned long addr = start->addr;
231
232 *(unsigned int *) (addr + 0) = start->insn;
233 wmb();
234 __asm__ __volatile__("flush %0" : : "r" (addr + 0));
235
236 start++;
237 }
238 }
239
sun4v_patch_2insn_range(struct sun4v_2insn_patch_entry * start,struct sun4v_2insn_patch_entry * end)240 void sun4v_patch_2insn_range(struct sun4v_2insn_patch_entry *start,
241 struct sun4v_2insn_patch_entry *end)
242 {
243 while (start < end) {
244 unsigned long addr = start->addr;
245
246 *(unsigned int *) (addr + 0) = start->insns[0];
247 wmb();
248 __asm__ __volatile__("flush %0" : : "r" (addr + 0));
249
250 *(unsigned int *) (addr + 4) = start->insns[1];
251 wmb();
252 __asm__ __volatile__("flush %0" : : "r" (addr + 4));
253
254 start++;
255 }
256 }
257
sun_m7_patch_2insn_range(struct sun4v_2insn_patch_entry * start,struct sun4v_2insn_patch_entry * end)258 void sun_m7_patch_2insn_range(struct sun4v_2insn_patch_entry *start,
259 struct sun4v_2insn_patch_entry *end)
260 {
261 while (start < end) {
262 unsigned long addr = start->addr;
263
264 *(unsigned int *) (addr + 0) = start->insns[0];
265 wmb();
266 __asm__ __volatile__("flush %0" : : "r" (addr + 0));
267
268 *(unsigned int *) (addr + 4) = start->insns[1];
269 wmb();
270 __asm__ __volatile__("flush %0" : : "r" (addr + 4));
271
272 start++;
273 }
274 }
275
sun4v_patch(void)276 static void __init sun4v_patch(void)
277 {
278 extern void sun4v_hvapi_init(void);
279
280 if (tlb_type != hypervisor)
281 return;
282
283 sun4v_patch_1insn_range(&__sun4v_1insn_patch,
284 &__sun4v_1insn_patch_end);
285
286 sun4v_patch_2insn_range(&__sun4v_2insn_patch,
287 &__sun4v_2insn_patch_end);
288 if (sun4v_chip_type == SUN4V_CHIP_SPARC_M7)
289 sun_m7_patch_2insn_range(&__sun_m7_2insn_patch,
290 &__sun_m7_2insn_patch_end);
291
292 sun4v_hvapi_init();
293 }
294
popc_patch(void)295 static void __init popc_patch(void)
296 {
297 struct popc_3insn_patch_entry *p3;
298 struct popc_6insn_patch_entry *p6;
299
300 p3 = &__popc_3insn_patch;
301 while (p3 < &__popc_3insn_patch_end) {
302 unsigned long i, addr = p3->addr;
303
304 for (i = 0; i < 3; i++) {
305 *(unsigned int *) (addr + (i * 4)) = p3->insns[i];
306 wmb();
307 __asm__ __volatile__("flush %0"
308 : : "r" (addr + (i * 4)));
309 }
310
311 p3++;
312 }
313
314 p6 = &__popc_6insn_patch;
315 while (p6 < &__popc_6insn_patch_end) {
316 unsigned long i, addr = p6->addr;
317
318 for (i = 0; i < 6; i++) {
319 *(unsigned int *) (addr + (i * 4)) = p6->insns[i];
320 wmb();
321 __asm__ __volatile__("flush %0"
322 : : "r" (addr + (i * 4)));
323 }
324
325 p6++;
326 }
327 }
328
pause_patch(void)329 static void __init pause_patch(void)
330 {
331 struct pause_patch_entry *p;
332
333 p = &__pause_3insn_patch;
334 while (p < &__pause_3insn_patch_end) {
335 unsigned long i, addr = p->addr;
336
337 for (i = 0; i < 3; i++) {
338 *(unsigned int *) (addr + (i * 4)) = p->insns[i];
339 wmb();
340 __asm__ __volatile__("flush %0"
341 : : "r" (addr + (i * 4)));
342 }
343
344 p++;
345 }
346 }
347
start_early_boot(void)348 void __init start_early_boot(void)
349 {
350 int cpu;
351
352 check_if_starfire();
353 per_cpu_patch();
354 sun4v_patch();
355
356 cpu = hard_smp_processor_id();
357 if (cpu >= NR_CPUS) {
358 prom_printf("Serious problem, boot cpu id (%d) >= NR_CPUS (%d)\n",
359 cpu, NR_CPUS);
360 prom_halt();
361 }
362 current_thread_info()->cpu = cpu;
363
364 prom_init_report();
365 start_kernel();
366 }
367
368 /* On Ultra, we support all of the v8 capabilities. */
369 unsigned long sparc64_elf_hwcap = (HWCAP_SPARC_FLUSH | HWCAP_SPARC_STBAR |
370 HWCAP_SPARC_SWAP | HWCAP_SPARC_MULDIV |
371 HWCAP_SPARC_V9);
372 EXPORT_SYMBOL(sparc64_elf_hwcap);
373
374 static const char *hwcaps[] = {
375 "flush", "stbar", "swap", "muldiv", "v9",
376 "ultra3", "blkinit", "n2",
377
378 /* These strings are as they appear in the machine description
379 * 'hwcap-list' property for cpu nodes.
380 */
381 "mul32", "div32", "fsmuld", "v8plus", "popc", "vis", "vis2",
382 "ASIBlkInit", "fmaf", "vis3", "hpc", "random", "trans", "fjfmau",
383 "ima", "cspare", "pause", "cbcond", NULL /*reserved for crypto */,
384 "adp",
385 };
386
387 static const char *crypto_hwcaps[] = {
388 "aes", "des", "kasumi", "camellia", "md5", "sha1", "sha256",
389 "sha512", "mpmul", "montmul", "montsqr", "crc32c",
390 };
391
cpucap_info(struct seq_file * m)392 void cpucap_info(struct seq_file *m)
393 {
394 unsigned long caps = sparc64_elf_hwcap;
395 int i, printed = 0;
396
397 seq_puts(m, "cpucaps\t\t: ");
398 for (i = 0; i < ARRAY_SIZE(hwcaps); i++) {
399 unsigned long bit = 1UL << i;
400 if (hwcaps[i] && (caps & bit)) {
401 seq_printf(m, "%s%s",
402 printed ? "," : "", hwcaps[i]);
403 printed++;
404 }
405 }
406 if (caps & HWCAP_SPARC_CRYPTO) {
407 unsigned long cfr;
408
409 __asm__ __volatile__("rd %%asr26, %0" : "=r" (cfr));
410 for (i = 0; i < ARRAY_SIZE(crypto_hwcaps); i++) {
411 unsigned long bit = 1UL << i;
412 if (cfr & bit) {
413 seq_printf(m, "%s%s",
414 printed ? "," : "", crypto_hwcaps[i]);
415 printed++;
416 }
417 }
418 }
419 seq_putc(m, '\n');
420 }
421
report_one_hwcap(int * printed,const char * name)422 static void __init report_one_hwcap(int *printed, const char *name)
423 {
424 if ((*printed) == 0)
425 printk(KERN_INFO "CPU CAPS: [");
426 printk(KERN_CONT "%s%s",
427 (*printed) ? "," : "", name);
428 if (++(*printed) == 8) {
429 printk(KERN_CONT "]\n");
430 *printed = 0;
431 }
432 }
433
report_crypto_hwcaps(int * printed)434 static void __init report_crypto_hwcaps(int *printed)
435 {
436 unsigned long cfr;
437 int i;
438
439 __asm__ __volatile__("rd %%asr26, %0" : "=r" (cfr));
440
441 for (i = 0; i < ARRAY_SIZE(crypto_hwcaps); i++) {
442 unsigned long bit = 1UL << i;
443 if (cfr & bit)
444 report_one_hwcap(printed, crypto_hwcaps[i]);
445 }
446 }
447
report_hwcaps(unsigned long caps)448 static void __init report_hwcaps(unsigned long caps)
449 {
450 int i, printed = 0;
451
452 for (i = 0; i < ARRAY_SIZE(hwcaps); i++) {
453 unsigned long bit = 1UL << i;
454 if (hwcaps[i] && (caps & bit))
455 report_one_hwcap(&printed, hwcaps[i]);
456 }
457 if (caps & HWCAP_SPARC_CRYPTO)
458 report_crypto_hwcaps(&printed);
459 if (printed != 0)
460 printk(KERN_CONT "]\n");
461 }
462
mdesc_cpu_hwcap_list(void)463 static unsigned long __init mdesc_cpu_hwcap_list(void)
464 {
465 struct mdesc_handle *hp;
466 unsigned long caps = 0;
467 const char *prop;
468 int len;
469 u64 pn;
470
471 hp = mdesc_grab();
472 if (!hp)
473 return 0;
474
475 pn = mdesc_node_by_name(hp, MDESC_NODE_NULL, "cpu");
476 if (pn == MDESC_NODE_NULL)
477 goto out;
478
479 prop = mdesc_get_property(hp, pn, "hwcap-list", &len);
480 if (!prop)
481 goto out;
482
483 while (len) {
484 int i, plen;
485
486 for (i = 0; i < ARRAY_SIZE(hwcaps); i++) {
487 unsigned long bit = 1UL << i;
488
489 if (hwcaps[i] && !strcmp(prop, hwcaps[i])) {
490 caps |= bit;
491 break;
492 }
493 }
494 for (i = 0; i < ARRAY_SIZE(crypto_hwcaps); i++) {
495 if (!strcmp(prop, crypto_hwcaps[i]))
496 caps |= HWCAP_SPARC_CRYPTO;
497 }
498
499 plen = strlen(prop) + 1;
500 prop += plen;
501 len -= plen;
502 }
503
504 out:
505 mdesc_release(hp);
506 return caps;
507 }
508
509 /* This yields a mask that user programs can use to figure out what
510 * instruction set this cpu supports.
511 */
init_sparc64_elf_hwcap(void)512 static void __init init_sparc64_elf_hwcap(void)
513 {
514 unsigned long cap = sparc64_elf_hwcap;
515 unsigned long mdesc_caps;
516
517 if (tlb_type == cheetah || tlb_type == cheetah_plus)
518 cap |= HWCAP_SPARC_ULTRA3;
519 else if (tlb_type == hypervisor) {
520 if (sun4v_chip_type == SUN4V_CHIP_NIAGARA1 ||
521 sun4v_chip_type == SUN4V_CHIP_NIAGARA2 ||
522 sun4v_chip_type == SUN4V_CHIP_NIAGARA3 ||
523 sun4v_chip_type == SUN4V_CHIP_NIAGARA4 ||
524 sun4v_chip_type == SUN4V_CHIP_NIAGARA5 ||
525 sun4v_chip_type == SUN4V_CHIP_SPARC_M6 ||
526 sun4v_chip_type == SUN4V_CHIP_SPARC_M7 ||
527 sun4v_chip_type == SUN4V_CHIP_SPARC64X)
528 cap |= HWCAP_SPARC_BLKINIT;
529 if (sun4v_chip_type == SUN4V_CHIP_NIAGARA2 ||
530 sun4v_chip_type == SUN4V_CHIP_NIAGARA3 ||
531 sun4v_chip_type == SUN4V_CHIP_NIAGARA4 ||
532 sun4v_chip_type == SUN4V_CHIP_NIAGARA5 ||
533 sun4v_chip_type == SUN4V_CHIP_SPARC_M6 ||
534 sun4v_chip_type == SUN4V_CHIP_SPARC_M7 ||
535 sun4v_chip_type == SUN4V_CHIP_SPARC64X)
536 cap |= HWCAP_SPARC_N2;
537 }
538
539 cap |= (AV_SPARC_MUL32 | AV_SPARC_DIV32 | AV_SPARC_V8PLUS);
540
541 mdesc_caps = mdesc_cpu_hwcap_list();
542 if (!mdesc_caps) {
543 if (tlb_type == spitfire)
544 cap |= AV_SPARC_VIS;
545 if (tlb_type == cheetah || tlb_type == cheetah_plus)
546 cap |= AV_SPARC_VIS | AV_SPARC_VIS2;
547 if (tlb_type == cheetah_plus) {
548 unsigned long impl, ver;
549
550 __asm__ __volatile__("rdpr %%ver, %0" : "=r" (ver));
551 impl = ((ver >> 32) & 0xffff);
552 if (impl == PANTHER_IMPL)
553 cap |= AV_SPARC_POPC;
554 }
555 if (tlb_type == hypervisor) {
556 if (sun4v_chip_type == SUN4V_CHIP_NIAGARA1)
557 cap |= AV_SPARC_ASI_BLK_INIT;
558 if (sun4v_chip_type == SUN4V_CHIP_NIAGARA2 ||
559 sun4v_chip_type == SUN4V_CHIP_NIAGARA3 ||
560 sun4v_chip_type == SUN4V_CHIP_NIAGARA4 ||
561 sun4v_chip_type == SUN4V_CHIP_NIAGARA5 ||
562 sun4v_chip_type == SUN4V_CHIP_SPARC_M6 ||
563 sun4v_chip_type == SUN4V_CHIP_SPARC_M7 ||
564 sun4v_chip_type == SUN4V_CHIP_SPARC64X)
565 cap |= (AV_SPARC_VIS | AV_SPARC_VIS2 |
566 AV_SPARC_ASI_BLK_INIT |
567 AV_SPARC_POPC);
568 if (sun4v_chip_type == SUN4V_CHIP_NIAGARA3 ||
569 sun4v_chip_type == SUN4V_CHIP_NIAGARA4 ||
570 sun4v_chip_type == SUN4V_CHIP_NIAGARA5 ||
571 sun4v_chip_type == SUN4V_CHIP_SPARC_M6 ||
572 sun4v_chip_type == SUN4V_CHIP_SPARC_M7 ||
573 sun4v_chip_type == SUN4V_CHIP_SPARC64X)
574 cap |= (AV_SPARC_VIS3 | AV_SPARC_HPC |
575 AV_SPARC_FMAF);
576 }
577 }
578 sparc64_elf_hwcap = cap | mdesc_caps;
579
580 report_hwcaps(sparc64_elf_hwcap);
581
582 if (sparc64_elf_hwcap & AV_SPARC_POPC)
583 popc_patch();
584 if (sparc64_elf_hwcap & AV_SPARC_PAUSE)
585 pause_patch();
586 }
587
setup_arch(char ** cmdline_p)588 void __init setup_arch(char **cmdline_p)
589 {
590 /* Initialize PROM console and command line. */
591 *cmdline_p = prom_getbootargs();
592 strlcpy(boot_command_line, *cmdline_p, COMMAND_LINE_SIZE);
593 parse_early_param();
594
595 boot_flags_init(*cmdline_p);
596 #ifdef CONFIG_EARLYFB
597 if (btext_find_display())
598 #endif
599 register_console(&prom_early_console);
600
601 if (tlb_type == hypervisor)
602 printk("ARCH: SUN4V\n");
603 else
604 printk("ARCH: SUN4U\n");
605
606 #ifdef CONFIG_DUMMY_CONSOLE
607 conswitchp = &dummy_con;
608 #endif
609
610 idprom_init();
611
612 if (!root_flags)
613 root_mountflags &= ~MS_RDONLY;
614 ROOT_DEV = old_decode_dev(root_dev);
615 #ifdef CONFIG_BLK_DEV_RAM
616 rd_image_start = ram_flags & RAMDISK_IMAGE_START_MASK;
617 rd_prompt = ((ram_flags & RAMDISK_PROMPT_FLAG) != 0);
618 rd_doload = ((ram_flags & RAMDISK_LOAD_FLAG) != 0);
619 #endif
620
621 task_thread_info(&init_task)->kregs = &fake_swapper_regs;
622
623 #ifdef CONFIG_IP_PNP
624 if (!ic_set_manually) {
625 phandle chosen = prom_finddevice("/chosen");
626 u32 cl, sv, gw;
627
628 cl = prom_getintdefault (chosen, "client-ip", 0);
629 sv = prom_getintdefault (chosen, "server-ip", 0);
630 gw = prom_getintdefault (chosen, "gateway-ip", 0);
631 if (cl && sv) {
632 ic_myaddr = cl;
633 ic_servaddr = sv;
634 if (gw)
635 ic_gateway = gw;
636 #if defined(CONFIG_IP_PNP_BOOTP) || defined(CONFIG_IP_PNP_RARP)
637 ic_proto_enabled = 0;
638 #endif
639 }
640 }
641 #endif
642
643 /* Get boot processor trap_block[] setup. */
644 init_cur_cpu_trap(current_thread_info());
645
646 paging_init();
647 init_sparc64_elf_hwcap();
648 }
649
650 extern int stop_a_enabled;
651
sun_do_break(void)652 void sun_do_break(void)
653 {
654 if (!stop_a_enabled)
655 return;
656
657 prom_printf("\n");
658 flush_user_windows();
659
660 prom_cmdline();
661 }
662 EXPORT_SYMBOL(sun_do_break);
663
664 int stop_a_enabled = 1;
665 EXPORT_SYMBOL(stop_a_enabled);
666