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/io.h>
35 #include <asm/processor.h>
36 #include <asm/oplib.h>
37 #include <asm/page.h>
38 #include <asm/pgtable.h>
39 #include <asm/idprom.h>
40 #include <asm/head.h>
41 #include <asm/starfire.h>
42 #include <asm/mmu_context.h>
43 #include <asm/timer.h>
44 #include <asm/sections.h>
45 #include <asm/setup.h>
46 #include <asm/mmu.h>
47 #include <asm/ns87303.h>
48 #include <asm/btext.h>
49 #include <asm/elf.h>
50 #include <asm/mdesc.h>
51 #include <asm/cacheflush.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
prom_console_write(struct console * con,const char * s,unsigned n)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 */
process_switch(char c)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
boot_flags_init(char * commands)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
per_cpu_patch(void)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
sun4v_patch_1insn_range(struct sun4v_1insn_patch_entry * start,struct sun4v_1insn_patch_entry * end)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
sun4v_patch_2insn_range(struct sun4v_2insn_patch_entry * start,struct sun4v_2insn_patch_entry * end)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
sun4v_patch(void)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
popc_patch(void)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
boot_cpu_id_too_large(int cpu)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
cpucap_info(struct seq_file * m)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
report_hwcaps(unsigned long caps)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
mdesc_cpu_hwcap_list(void)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 */
init_sparc64_elf_hwcap(void)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
setup_arch(char ** cmdline_p)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
sun_do_break(void)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);
568