xref: /netbsd-src/sys/arch/evbppc/wii/machdep.c (revision e38b273eb2c519303538d62e2ea339278c669160)
1 /* $NetBSD: machdep.c,v 1.8 2024/10/19 12:34:10 jmcneill Exp $ */
2 
3 /*
4  * Copyright (c) 2002, 2024 The NetBSD Foundation, Inc.
5  * All rights reserved.
6  *
7  * This code is derived from software contributed to The NetBSD Foundation
8  * by Lennart Augustsson (lennart@augustsson.net) at Sandburst Corp.
9  *
10  * Redistribution and use in source and binary forms, with or without
11  * modification, are permitted provided that the following conditions
12  * are met:
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in the
17  *    documentation and/or other materials provided with the distribution.
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29  * POSSIBILITY OF SUCH DAMAGE.
30  */
31 
32 /*
33  * Copyright (C) 1995, 1996 Wolfgang Solfrank.
34  * Copyright (C) 1995, 1996 TooLs GmbH.
35  * All rights reserved.
36  *
37  * Redistribution and use in source and binary forms, with or without
38  * modification, are permitted provided that the following conditions
39  * are met:
40  * 1. Redistributions of source code must retain the above copyright
41  *    notice, this list of conditions and the following disclaimer.
42  * 2. Redistributions in binary form must reproduce the above copyright
43  *    notice, this list of conditions and the following disclaimer in the
44  *    documentation and/or other materials provided with the distribution.
45  * 3. All advertising materials mentioning features or use of this software
46  *    must display the following acknowledgement:
47  *	This product includes software developed by TooLs GmbH.
48  * 4. The name of TooLs GmbH may not be used to endorse or promote products
49  *    derived from this software without specific prior written permission.
50  *
51  * THIS SOFTWARE IS PROVIDED BY TOOLS GMBH ``AS IS'' AND ANY EXPRESS OR
52  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
53  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
54  * IN NO EVENT SHALL TOOLS GMBH BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
55  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
56  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
57  * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
58  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
59  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
60  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
61  */
62 
63 #define _POWERPC_BUS_DMA_PRIVATE
64 
65 #include <sys/cdefs.h>
66 __KERNEL_RCSID(0, "$NetBSD: machdep.c,v 1.8 2024/10/19 12:34:10 jmcneill Exp $");
67 
68 #include "opt_compat_netbsd.h"
69 #include "opt_ddb.h"
70 #include "opt_ddbparam.h"
71 #include "opt_inet.h"
72 #include "opt_ns.h"
73 #include "opt_oea.h"
74 
75 #include <sys/param.h>
76 #include <sys/buf.h>
77 #include <sys/bus.h>
78 #include <sys/conf.h>
79 #include <sys/device.h>
80 #include <sys/exec.h>
81 #include <sys/extent.h>
82 #include <sys/intr.h>
83 #include <sys/kernel.h>
84 #include <sys/kgdb.h>
85 #include <sys/ksyms.h>
86 #include <sys/mbuf.h>
87 #include <sys/mount.h>
88 #include <sys/msgbuf.h>
89 #include <sys/proc.h>
90 #include <sys/reboot.h>
91 #include <sys/syscallargs.h>
92 #include <sys/sysctl.h>
93 #include <sys/syslog.h>
94 #include <sys/systm.h>
95 
96 #include <uvm/uvm_extern.h>
97 
98 #include <machine/powerpc.h>
99 #include <machine/wii.h>
100 
101 #include <powerpc/bus_funcs.h>
102 #include <powerpc/db_machdep.h>
103 #include <powerpc/pio.h>
104 #include <powerpc/pmap.h>
105 #include <powerpc/spr.h>
106 #include <powerpc/trap.h>
107 
108 #include <powerpc/oea/bat.h>
109 #include <powerpc/oea/spr.h>
110 #include <powerpc/pic/picvar.h>
111 
112 #include <ddb/db_extern.h>
113 
114 #include <dev/wscons/wsconsio.h>
115 #include <dev/wscons/wsdisplayvar.h>
116 #include <dev/rasops/rasops.h>
117 #include <dev/wsfont/wsfont.h>
118 #include <dev/wscons/wsdisplay_vconsvar.h>
119 
120 #include <dev/usb/ukbdvar.h>
121 
122 #include "ksyms.h"
123 #include "ukbd.h"
124 
125 #ifndef WII_DEFAULT_CMDLINE
126 #define WII_DEFAULT_CMDLINE "root=ld0a"
127 #endif
128 
129 #define IBM750CL_SPR_HID4	1011
130 #define	 L2_CCFI		0x00100000	/* L2 complete castout prior
131 						 * to L2 flash invalidate.
132 						 */
133 
134 #define MINI_MEM2_START		0x13f00000	/* Start of reserved MEM2 for MINI */
135 
136 extern u_int l2cr_config;
137 
138 struct powerpc_bus_space wii_mem_tag = {
139 	.pbs_flags = _BUS_SPACE_BIG_ENDIAN |
140 		     _BUS_SPACE_MEM_TYPE,
141 	.pbs_offset = 0,
142 	.pbs_base = 0x0c000000,
143 	.pbs_limit = 0x0dffffff,
144 	.pbs_extent = NULL,
145 };
146 
147 static char ex_storage[1][EXTENT_FIXED_STORAGE_SIZE(EXTMAP_RANGES)]
148     __attribute__((aligned(8)));
149 
150 static bus_addr_t
151 wii_dma_phys_to_bus_mem(bus_dma_tag_t t, bus_addr_t addr)
152 {
153 	return addr;
154 }
155 
156 static bus_addr_t
157 wii_dma_bus_mem_to_phys(bus_dma_tag_t t, bus_addr_t addr)
158 {
159 	return addr;
160 }
161 
162 static int
163 wii_mem2_dmamem_alloc(bus_dma_tag_t t, bus_size_t size, bus_size_t alignment,
164     bus_size_t boundary, bus_dma_segment_t *segs, int nsegs, int *rsegs,
165     int flags)
166 {
167 	struct mem_region *mem, *avail;
168 
169 	/* Restrict memory used for DMA to ranges in MEM2 */
170 	mem_regions(&mem, &avail);
171 	if (mem[1].size == 0) {
172 		return ENOMEM;
173 	}
174 
175 	return _bus_dmamem_alloc_range(t, size, alignment, boundary, segs,
176 	    nsegs, rsegs, flags, mem[1].start,
177 	    mem[1].start + mem[1].size - PAGE_SIZE - 1);
178 }
179 
180 struct powerpc_bus_dma_tag wii_bus_dma_tag = {
181 	0,				/* _bounce_thresh */
182 	_bus_dmamap_create,
183 	_bus_dmamap_destroy,
184 	_bus_dmamap_load,
185 	_bus_dmamap_load_mbuf,
186 	_bus_dmamap_load_uio,
187 	_bus_dmamap_load_raw,
188 	_bus_dmamap_unload,
189 	_bus_dmamap_sync,
190 	_bus_dmamem_alloc,
191 	_bus_dmamem_free,
192 	_bus_dmamem_map,
193 	_bus_dmamem_unmap,
194 	_bus_dmamem_mmap,
195 	wii_dma_phys_to_bus_mem,
196 	wii_dma_bus_mem_to_phys,
197 };
198 
199 struct powerpc_bus_dma_tag wii_mem2_bus_dma_tag = {
200 	0,				/* _bounce_thresh */
201 	_bus_dmamap_create,
202 	_bus_dmamap_destroy,
203 	_bus_dmamap_load,
204 	_bus_dmamap_load_mbuf,
205 	_bus_dmamap_load_uio,
206 	_bus_dmamap_load_raw,
207 	_bus_dmamap_unload,
208 	_bus_dmamap_sync,
209 	wii_mem2_dmamem_alloc,
210 	_bus_dmamem_free,
211 	_bus_dmamem_map,
212 	_bus_dmamem_unmap,
213 	_bus_dmamem_mmap,
214 	wii_dma_phys_to_bus_mem,
215 	wii_dma_bus_mem_to_phys,
216 };
217 
218 
219 /*
220  * Global variables used here and there
221  */
222 struct mem_region physmemr[3], availmemr[3];
223 char wii_cmdline[1024];
224 
225 void initppc(u_int, u_int, u_int, void *); /* Called from locore */
226 void wii_dolphin_elf_loader_id(void);
227 
228 static void wii_setup(void);
229 static void init_decrementer(void);
230 
231 void
232 initppc(u_int startkernel, u_int endkernel, u_int args, void *btinfo)
233 {
234 	extern uint32_t ticks_per_sec;
235 	extern uint32_t ticks_per_msec;
236 	extern unsigned char edata[], end[];
237 	extern struct wii_argv wii_argv;
238 	uint32_t mem2_start, mem2_end;
239 	register_t scratch;
240 
241 	memset(&edata, 0, end - edata); /* clear BSS */
242 
243 	wii_cmdline[0] = '\0';
244 	if (wii_argv.magic == WII_ARGV_MAGIC) {
245 		void *ptr = (void *)(uintptr_t)(wii_argv.cmdline & ~0x80000000);
246 		if (ptr != NULL) {
247 			memcpy(wii_cmdline, ptr, wii_argv.length);
248 		}
249 	} else {
250 		snprintf(wii_cmdline, sizeof(wii_cmdline), WII_DEFAULT_CMDLINE);
251 	}
252 
253 	mem2_start = in32(GLOBAL_MEM2_AVAIL_START) & ~0x80000000;
254 	mem2_end = in32(GLOBAL_MEM2_AVAIL_END) & ~0x80000000;
255 	if (mem2_start < WII_MEM2_BASE) {
256 		/* Must have been booted from MINI. */
257 		mem2_start = WII_MEM2_BASE + DSP_MEM_SIZE;
258 		mem2_end = MINI_MEM2_START;
259 	}
260 	/*
261 	 * Clear GLOBAL_MEM2_AVAIL_{START,END} so we can detect the correct
262 	 * memory size when soft resetting from IOS to MINI.
263 	 */
264 	out32(GLOBAL_MEM2_AVAIL_START, 0);
265 	out32(GLOBAL_MEM2_AVAIL_END, 0);
266 
267 	/* MEM1 24MB 1T-SRAM */
268 	physmemr[0].start = WII_MEM1_BASE;
269 	physmemr[0].size = WII_MEM1_SIZE;
270 
271 	/* MEM2 64MB GDDR3 */
272 	physmemr[1].start = WII_MEM2_BASE;
273 	physmemr[1].size = WII_MEM2_SIZE;
274 
275 	physmemr[2].size = 0;
276 
277 	/* MEM1 available memory */
278 	availmemr[0].start = ((endkernel & ~0x80000000) + PGOFSET) & ~PGOFSET;
279 	availmemr[0].size = physmemr[0].size - availmemr[0].start;
280 	/* External framebuffer is at the end of MEM1 */
281 	availmemr[0].size -= XFB_SIZE;
282 
283 	/* MEM2 available memory */
284 	availmemr[1].start = mem2_start;
285 	availmemr[1].size = mem2_end - mem2_start;
286 
287 	availmemr[2].size = 0;
288 
289 #ifdef BOOTHOWTO
290 	/*
291 	 * boothowto
292 	 */
293 	boothowto = BOOTHOWTO;
294 #endif
295 
296 	/* HID4[L2_CCFI] must be set to 1 for correct operation of L2 cache */
297 	mtspr(IBM750CL_SPR_HID4, mfspr(IBM750CL_SPR_HID4) | L2_CCFI);
298 
299 	/* Configure L2 cache */
300 	l2cr_config = L2CR_L2E | L2CR_L2PE;
301 
302 	if (bus_space_init(&wii_mem_tag, "iomem",
303 			   ex_storage[0], sizeof(ex_storage[0]))) {
304 		panic("bus_space_init failed");
305 	}
306 
307 	/*
308 	 * Initialize the BAT registers
309 	 */
310 	oea_batinit(
311 	    WII_IOMEM_BASE, BAT_BL_32M,
312 	    0);
313 
314 	/*
315 	 * Set up trap vectors
316 	 */
317 	oea_init(NULL);
318 
319 	/*
320 	 * Get CPU clock
321 	 */
322 	ticks_per_sec = TIMEBASE_FREQ_HZ;
323 	ticks_per_msec = ticks_per_sec / 1000;
324 	cpu_timebase = ticks_per_sec;
325 
326 	wii_setup();
327 
328 	uvm_md_init();
329 
330 	/*
331 	 * Initialize pmap module.
332 	 */
333 	pmap_bootstrap(startkernel, endkernel);
334 
335 	/* Now enable translation (and machine checks/recoverable interrupts) */
336 	__asm __volatile ("sync; mfmsr %0; ori %0,%0,%1; mtmsr %0; isync"
337 			  : "=r"(scratch)
338 			  : "K"(PSL_IR|PSL_DR|PSL_ME|PSL_RI));
339 
340 	/*
341 	 * Setup decrementer
342 	 */
343 	init_decrementer();
344 }
345 
346 void
347 mem_regions(struct mem_region **mem, struct mem_region **avail)
348 {
349 	*mem = physmemr;
350 	*avail = availmemr;
351 }
352 
353 /*
354  * Machine dependent startup code.
355  */
356 void
357 cpu_startup(void)
358 {
359 	extern void pi_init_intr(void);
360 
361 	oea_startup(NULL);
362 
363 	/*
364 	 * Now that we have VM, malloc()s are OK in bus_space.
365 	 */
366 	bus_space_mallocok();
367 
368 	/* Set up interrupt controller */
369 	pic_init();
370 	pi_init_intr();
371 	oea_install_extint(pic_ext_intr);
372 }
373 
374 /*
375  * No early console support.
376  */
377 void
378 consinit(void)
379 {
380 #if NUKBD > 0
381 	ukbd_cnattach();
382 #endif
383 }
384 
385 /*
386  * Halt or reboot the machine after syncing/dumping according to howto.
387  */
388 void
389 cpu_reboot(int howto, char *what)
390 {
391 	static int syncing;
392 	extern void disable_intr(void);
393 
394 	boothowto = howto;
395 	if (!cold && !(howto & RB_NOSYNC) && !syncing) {
396 		syncing = 1;
397 		vfs_shutdown();		/* sync */
398 	}
399 	splhigh();
400 	if (!cold && (howto & RB_DUMP)) {
401 		oea_dumpsys();
402 	}
403 	pmf_system_shutdown(boothowto);
404 	doshutdownhooks();
405 
406 	disable_intr();
407 
408 	/* Force halt on panic to capture the cause on screen. */
409 	if (panicstr != NULL) {
410 		howto |= RB_HALT;
411 	}
412 	if ((howto & RB_POWERDOWN) == RB_POWERDOWN) {
413 		printf("power off\n\n");
414 		out32(HW_GPIOB_OUT, in32(HW_GPIOB_OUT) | __BIT(GPIO_SHUTDOWN));
415 		delay(100000);
416 		printf("power off failed!\n\n");
417 	}
418 	if (howto & RB_HALT) {
419 		printf("halted\n\n");
420 		while (1);
421 	}
422 
423 	printf("rebooting\n\n");
424 	out32(HW_RESETS, in32(HW_RESETS) & ~RSTBINB);
425 	while (1);
426 }
427 
428 static void
429 wii_setup(void)
430 {
431 	/* Turn on the drive slot LED. */
432 	wii_slot_led(true);
433 
434 	/* Enable PPC access to SHUTDOWN GPIO. */
435 	out32(HW_GPIO_OWNER, in32(HW_GPIO_OWNER) | __BIT(GPIO_SHUTDOWN));
436 
437 	/* Enable PPC access to EXI bus. */
438 	out32(HW_AIPPROT, in32(HW_AIPPROT) | ENAHBIOPI);
439 }
440 
441 static void
442 init_decrementer(void)
443 {
444 	extern uint32_t ns_per_tick;
445 	extern uint32_t ticks_per_intr;
446 	extern uint32_t ticks_per_sec;
447 	int scratch, msr;
448 
449 	KASSERT(ticks_per_sec != 0);
450 
451 	__asm volatile ("mfmsr %0; andi. %1,%0,%2; mtmsr %1"
452 			: "=r"(msr), "=r"(scratch) : "K"((u_short)~PSL_EE));
453 	ns_per_tick = 1000000000 / ticks_per_sec;
454 	ticks_per_intr = ticks_per_sec / hz;
455 	cpu_timebase = ticks_per_sec;
456 
457 	curcpu()->ci_lasttb = mftbl();
458 
459 	mtspr(SPR_DEC, ticks_per_intr);
460 	mtmsr(msr);
461 }
462