machdep.c revision 1.7 1 /* $NetBSD: machdep.c,v 1.7 2024/10/13 16:21:37 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 (at) 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.7 2024/10/13 16:21:37 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 u_long ticks_per_sec;
235 extern unsigned char edata[], end[];
236 extern struct wii_argv wii_argv;
237 uint32_t mem2_start, mem2_end;
238 register_t scratch;
239
240 memset(&edata, 0, end - edata); /* clear BSS */
241
242 wii_cmdline[0] = '\0';
243 if (wii_argv.magic == WII_ARGV_MAGIC) {
244 void *ptr = (void *)(uintptr_t)(wii_argv.cmdline & ~0x80000000);
245 if (ptr != NULL) {
246 memcpy(wii_cmdline, ptr, wii_argv.length);
247 }
248 } else {
249 snprintf(wii_cmdline, sizeof(wii_cmdline), WII_DEFAULT_CMDLINE);
250 }
251
252 mem2_start = in32(GLOBAL_MEM2_AVAIL_START) & ~0x80000000;
253 mem2_end = in32(GLOBAL_MEM2_AVAIL_END) & ~0x80000000;
254 if (mem2_start < WII_MEM2_BASE) {
255 /* Must have been booted from MINI. */
256 mem2_start = WII_MEM2_BASE + DSP_MEM_SIZE;
257 mem2_end = MINI_MEM2_START;
258 }
259 /*
260 * Clear GLOBAL_MEM2_AVAIL_{START,END} so we can detect the correct
261 * memory size when soft resetting from IOS to MINI.
262 */
263 out32(GLOBAL_MEM2_AVAIL_START, 0);
264 out32(GLOBAL_MEM2_AVAIL_END, 0);
265
266 /* MEM1 24MB 1T-SRAM */
267 physmemr[0].start = WII_MEM1_BASE;
268 physmemr[0].size = WII_MEM1_SIZE;
269
270 /* MEM2 64MB GDDR3 */
271 physmemr[1].start = WII_MEM2_BASE;
272 physmemr[1].size = WII_MEM2_SIZE;
273
274 physmemr[2].size = 0;
275
276 /* MEM1 available memory */
277 availmemr[0].start = ((endkernel & ~0x80000000) + PGOFSET) & ~PGOFSET;
278 availmemr[0].size = physmemr[0].size - availmemr[0].start;
279 /* External framebuffer is at the end of MEM1 */
280 availmemr[0].size -= XFB_SIZE;
281
282 /* MEM2 available memory */
283 availmemr[1].start = mem2_start;
284 availmemr[1].size = mem2_end - mem2_start;
285
286 availmemr[2].size = 0;
287
288 #ifdef BOOTHOWTO
289 /*
290 * boothowto
291 */
292 boothowto = BOOTHOWTO;
293 #endif
294
295 /* HID4[L2_CCFI] must be set to 1 for correct operation of L2 cache */
296 mtspr(IBM750CL_SPR_HID4, mfspr(IBM750CL_SPR_HID4) | L2_CCFI);
297
298 /* Configure L2 cache */
299 l2cr_config = L2CR_L2E | L2CR_L2PE;
300
301 if (bus_space_init(&wii_mem_tag, "iomem",
302 ex_storage[0], sizeof(ex_storage[0]))) {
303 panic("bus_space_init failed");
304 }
305
306 /*
307 * Initialize the BAT registers
308 */
309 oea_batinit(
310 WII_IOMEM_BASE, BAT_BL_32M,
311 0);
312
313 /*
314 * Set up trap vectors
315 */
316 oea_init(NULL);
317
318 /*
319 * Get CPU clock
320 */
321 ticks_per_sec = TIMEBASE_FREQ_HZ;
322 cpu_timebase = ticks_per_sec;
323
324 wii_setup();
325
326 uvm_md_init();
327
328 /*
329 * Initialize pmap module.
330 */
331 pmap_bootstrap(startkernel, endkernel);
332
333 /* Now enable translation (and machine checks/recoverable interrupts) */
334 __asm __volatile ("sync; mfmsr %0; ori %0,%0,%1; mtmsr %0; isync"
335 : "=r"(scratch)
336 : "K"(PSL_IR|PSL_DR|PSL_ME|PSL_RI));
337
338 /*
339 * Setup decrementer
340 */
341 init_decrementer();
342 }
343
344 void
345 mem_regions(struct mem_region **mem, struct mem_region **avail)
346 {
347 *mem = physmemr;
348 *avail = availmemr;
349 }
350
351 /*
352 * Machine dependent startup code.
353 */
354 void
355 cpu_startup(void)
356 {
357 extern void pi_init_intr(void);
358
359 oea_startup(NULL);
360
361 /*
362 * Now that we have VM, malloc()s are OK in bus_space.
363 */
364 bus_space_mallocok();
365
366 /* Set up interrupt controller */
367 pic_init();
368 pi_init_intr();
369 oea_install_extint(pic_ext_intr);
370 }
371
372 /*
373 * No early console support.
374 */
375 void
376 consinit(void)
377 {
378 #if NUKBD > 0
379 ukbd_cnattach();
380 #endif
381 }
382
383 /*
384 * Halt or reboot the machine after syncing/dumping according to howto.
385 */
386 void
387 cpu_reboot(int howto, char *what)
388 {
389 static int syncing;
390 extern void disable_intr(void);
391
392 boothowto = howto;
393 if (!cold && !(howto & RB_NOSYNC) && !syncing) {
394 syncing = 1;
395 vfs_shutdown(); /* sync */
396 }
397 splhigh();
398 if (!cold && (howto & RB_DUMP)) {
399 oea_dumpsys();
400 }
401 pmf_system_shutdown(boothowto);
402 doshutdownhooks();
403
404 disable_intr();
405
406 /* Force halt on panic to capture the cause on screen. */
407 if (panicstr != NULL) {
408 howto |= RB_HALT;
409 }
410 if ((howto & RB_POWERDOWN) == RB_POWERDOWN) {
411 printf("power off\n\n");
412 out32(HW_GPIOB_OUT, in32(HW_GPIOB_OUT) | __BIT(GPIO_SHUTDOWN));
413 delay(100000);
414 printf("power off failed!\n\n");
415 }
416 if (howto & RB_HALT) {
417 printf("halted\n\n");
418 while (1);
419 }
420
421 printf("rebooting\n\n");
422 out32(HW_RESETS, in32(HW_RESETS) & ~RSTBINB);
423 while (1);
424 }
425
426 static void
427 wii_setup(void)
428 {
429 /* Turn on the drive slot LED. */
430 wii_slot_led(true);
431
432 /* Enable PPC access to SHUTDOWN GPIO. */
433 out32(HW_GPIO_OWNER, in32(HW_GPIO_OWNER) | __BIT(GPIO_SHUTDOWN));
434
435 /* Enable PPC access to EXI bus. */
436 out32(HW_AIPPROT, in32(HW_AIPPROT) | ENAHBIOPI);
437 }
438
439 static void
440 init_decrementer(void)
441 {
442 extern uint32_t ns_per_tick;
443 extern uint32_t ticks_per_intr;
444 extern u_long ticks_per_sec;
445 int scratch, msr;
446
447 KASSERT(ticks_per_sec != 0);
448
449 __asm volatile ("mfmsr %0; andi. %1,%0,%2; mtmsr %1"
450 : "=r"(msr), "=r"(scratch) : "K"((u_short)~PSL_EE));
451 ns_per_tick = 1000000000 / ticks_per_sec;
452 ticks_per_intr = ticks_per_sec / hz;
453 cpu_timebase = ticks_per_sec;
454
455 curcpu()->ci_lasttb = mftbl();
456
457 mtspr(SPR_DEC, ticks_per_intr);
458 mtmsr(msr);
459 }
460