xref: /linux/arch/sparc/kernel/setup_64.c (revision 08ec212c0f92cbf30e3ecc7349f18151714041d6)
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
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", "pause", "cbcond",
344 };
345 
346 static const char *crypto_hwcaps[] = {
347 	"aes", "des", "kasumi", "camellia", "md5", "sha1", "sha256",
348 	"sha512", "mpmul", "montmul", "montsqr", "crc32c",
349 };
350 
351 void cpucap_info(struct seq_file *m)
352 {
353 	unsigned long caps = sparc64_elf_hwcap;
354 	int i, printed = 0;
355 
356 	seq_puts(m, "cpucaps\t\t: ");
357 	for (i = 0; i < ARRAY_SIZE(hwcaps); i++) {
358 		unsigned long bit = 1UL << i;
359 		if (caps & bit) {
360 			seq_printf(m, "%s%s",
361 				   printed ? "," : "", hwcaps[i]);
362 			printed++;
363 		}
364 	}
365 	if (caps & HWCAP_SPARC_CRYPTO) {
366 		unsigned long cfr;
367 
368 		__asm__ __volatile__("rd %%asr26, %0" : "=r" (cfr));
369 		for (i = 0; i < ARRAY_SIZE(crypto_hwcaps); i++) {
370 			unsigned long bit = 1UL << i;
371 			if (cfr & bit) {
372 				seq_printf(m, "%s%s",
373 					   printed ? "," : "", crypto_hwcaps[i]);
374 				printed++;
375 			}
376 		}
377 	}
378 	seq_putc(m, '\n');
379 }
380 
381 static void __init report_one_hwcap(int *printed, const char *name)
382 {
383 	if ((*printed) == 0)
384 		printk(KERN_INFO "CPU CAPS: [");
385 	printk(KERN_CONT "%s%s",
386 	       (*printed) ? "," : "", name);
387 	if (++(*printed) == 8) {
388 		printk(KERN_CONT "]\n");
389 		*printed = 0;
390 	}
391 }
392 
393 static void __init report_crypto_hwcaps(int *printed)
394 {
395 	unsigned long cfr;
396 	int i;
397 
398 	__asm__ __volatile__("rd %%asr26, %0" : "=r" (cfr));
399 
400 	for (i = 0; i < ARRAY_SIZE(crypto_hwcaps); i++) {
401 		unsigned long bit = 1UL << i;
402 		if (cfr & bit)
403 			report_one_hwcap(printed, crypto_hwcaps[i]);
404 	}
405 }
406 
407 static void __init report_hwcaps(unsigned long caps)
408 {
409 	int i, printed = 0;
410 
411 	for (i = 0; i < ARRAY_SIZE(hwcaps); i++) {
412 		unsigned long bit = 1UL << i;
413 		if (caps & bit)
414 			report_one_hwcap(&printed, hwcaps[i]);
415 	}
416 	if (caps & HWCAP_SPARC_CRYPTO)
417 		report_crypto_hwcaps(&printed);
418 	if (printed != 0)
419 		printk(KERN_CONT "]\n");
420 }
421 
422 static unsigned long __init mdesc_cpu_hwcap_list(void)
423 {
424 	struct mdesc_handle *hp;
425 	unsigned long caps = 0;
426 	const char *prop;
427 	int len;
428 	u64 pn;
429 
430 	hp = mdesc_grab();
431 	if (!hp)
432 		return 0;
433 
434 	pn = mdesc_node_by_name(hp, MDESC_NODE_NULL, "cpu");
435 	if (pn == MDESC_NODE_NULL)
436 		goto out;
437 
438 	prop = mdesc_get_property(hp, pn, "hwcap-list", &len);
439 	if (!prop)
440 		goto out;
441 
442 	while (len) {
443 		int i, plen;
444 
445 		for (i = 0; i < ARRAY_SIZE(hwcaps); i++) {
446 			unsigned long bit = 1UL << i;
447 
448 			if (!strcmp(prop, hwcaps[i])) {
449 				caps |= bit;
450 				break;
451 			}
452 		}
453 		for (i = 0; i < ARRAY_SIZE(crypto_hwcaps); i++) {
454 			if (!strcmp(prop, crypto_hwcaps[i]))
455 				caps |= HWCAP_SPARC_CRYPTO;
456 		}
457 
458 		plen = strlen(prop) + 1;
459 		prop += plen;
460 		len -= plen;
461 	}
462 
463 out:
464 	mdesc_release(hp);
465 	return caps;
466 }
467 
468 /* This yields a mask that user programs can use to figure out what
469  * instruction set this cpu supports.
470  */
471 static void __init init_sparc64_elf_hwcap(void)
472 {
473 	unsigned long cap = sparc64_elf_hwcap;
474 	unsigned long mdesc_caps;
475 
476 	if (tlb_type == cheetah || tlb_type == cheetah_plus)
477 		cap |= HWCAP_SPARC_ULTRA3;
478 	else if (tlb_type == hypervisor) {
479 		if (sun4v_chip_type == SUN4V_CHIP_NIAGARA1 ||
480 		    sun4v_chip_type == SUN4V_CHIP_NIAGARA2 ||
481 		    sun4v_chip_type == SUN4V_CHIP_NIAGARA3 ||
482 		    sun4v_chip_type == SUN4V_CHIP_NIAGARA4 ||
483 		    sun4v_chip_type == SUN4V_CHIP_NIAGARA5)
484 			cap |= HWCAP_SPARC_BLKINIT;
485 		if (sun4v_chip_type == SUN4V_CHIP_NIAGARA2 ||
486 		    sun4v_chip_type == SUN4V_CHIP_NIAGARA3 ||
487 		    sun4v_chip_type == SUN4V_CHIP_NIAGARA4 ||
488 		    sun4v_chip_type == SUN4V_CHIP_NIAGARA5)
489 			cap |= HWCAP_SPARC_N2;
490 	}
491 
492 	cap |= (AV_SPARC_MUL32 | AV_SPARC_DIV32 | AV_SPARC_V8PLUS);
493 
494 	mdesc_caps = mdesc_cpu_hwcap_list();
495 	if (!mdesc_caps) {
496 		if (tlb_type == spitfire)
497 			cap |= AV_SPARC_VIS;
498 		if (tlb_type == cheetah || tlb_type == cheetah_plus)
499 			cap |= AV_SPARC_VIS | AV_SPARC_VIS2;
500 		if (tlb_type == cheetah_plus) {
501 			unsigned long impl, ver;
502 
503 			__asm__ __volatile__("rdpr %%ver, %0" : "=r" (ver));
504 			impl = ((ver >> 32) & 0xffff);
505 			if (impl == PANTHER_IMPL)
506 				cap |= AV_SPARC_POPC;
507 		}
508 		if (tlb_type == hypervisor) {
509 			if (sun4v_chip_type == SUN4V_CHIP_NIAGARA1)
510 				cap |= AV_SPARC_ASI_BLK_INIT;
511 			if (sun4v_chip_type == SUN4V_CHIP_NIAGARA2 ||
512 			    sun4v_chip_type == SUN4V_CHIP_NIAGARA3 ||
513 			    sun4v_chip_type == SUN4V_CHIP_NIAGARA4 ||
514 			    sun4v_chip_type == SUN4V_CHIP_NIAGARA5)
515 				cap |= (AV_SPARC_VIS | AV_SPARC_VIS2 |
516 					AV_SPARC_ASI_BLK_INIT |
517 					AV_SPARC_POPC);
518 			if (sun4v_chip_type == SUN4V_CHIP_NIAGARA3 ||
519 			    sun4v_chip_type == SUN4V_CHIP_NIAGARA4 ||
520 			    sun4v_chip_type == SUN4V_CHIP_NIAGARA5)
521 				cap |= (AV_SPARC_VIS3 | AV_SPARC_HPC |
522 					AV_SPARC_FMAF);
523 		}
524 	}
525 	sparc64_elf_hwcap = cap | mdesc_caps;
526 
527 	report_hwcaps(sparc64_elf_hwcap);
528 
529 	if (sparc64_elf_hwcap & AV_SPARC_POPC)
530 		popc_patch();
531 }
532 
533 void __init setup_arch(char **cmdline_p)
534 {
535 	/* Initialize PROM console and command line. */
536 	*cmdline_p = prom_getbootargs();
537 	strcpy(boot_command_line, *cmdline_p);
538 	parse_early_param();
539 
540 	boot_flags_init(*cmdline_p);
541 #ifdef CONFIG_EARLYFB
542 	if (btext_find_display())
543 #endif
544 		register_console(&prom_early_console);
545 
546 	if (tlb_type == hypervisor)
547 		printk("ARCH: SUN4V\n");
548 	else
549 		printk("ARCH: SUN4U\n");
550 
551 #ifdef CONFIG_DUMMY_CONSOLE
552 	conswitchp = &dummy_con;
553 #endif
554 
555 	idprom_init();
556 
557 	if (!root_flags)
558 		root_mountflags &= ~MS_RDONLY;
559 	ROOT_DEV = old_decode_dev(root_dev);
560 #ifdef CONFIG_BLK_DEV_RAM
561 	rd_image_start = ram_flags & RAMDISK_IMAGE_START_MASK;
562 	rd_prompt = ((ram_flags & RAMDISK_PROMPT_FLAG) != 0);
563 	rd_doload = ((ram_flags & RAMDISK_LOAD_FLAG) != 0);
564 #endif
565 
566 	task_thread_info(&init_task)->kregs = &fake_swapper_regs;
567 
568 #ifdef CONFIG_IP_PNP
569 	if (!ic_set_manually) {
570 		phandle chosen = prom_finddevice("/chosen");
571 		u32 cl, sv, gw;
572 
573 		cl = prom_getintdefault (chosen, "client-ip", 0);
574 		sv = prom_getintdefault (chosen, "server-ip", 0);
575 		gw = prom_getintdefault (chosen, "gateway-ip", 0);
576 		if (cl && sv) {
577 			ic_myaddr = cl;
578 			ic_servaddr = sv;
579 			if (gw)
580 				ic_gateway = gw;
581 #if defined(CONFIG_IP_PNP_BOOTP) || defined(CONFIG_IP_PNP_RARP)
582 			ic_proto_enabled = 0;
583 #endif
584 		}
585 	}
586 #endif
587 
588 	/* Get boot processor trap_block[] setup.  */
589 	init_cur_cpu_trap(current_thread_info());
590 
591 	paging_init();
592 	init_sparc64_elf_hwcap();
593 }
594 
595 extern int stop_a_enabled;
596 
597 void sun_do_break(void)
598 {
599 	if (!stop_a_enabled)
600 		return;
601 
602 	prom_printf("\n");
603 	flush_user_windows();
604 
605 	prom_cmdline();
606 }
607 EXPORT_SYMBOL(sun_do_break);
608 
609 int stop_a_enabled = 1;
610 EXPORT_SYMBOL(stop_a_enabled);
611