1 /* $NetBSD: machdep.c,v 1.10 2025/09/02 22:35:53 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.10 2025/09/02 22:35:53 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 #define PI_INTERRUPT_CAUSE 0x0c003000 137 #define RESET_SWITCH_STATE __BIT(16) 138 139 extern u_int l2cr_config; 140 141 struct powerpc_bus_space wii_mem_tag = { 142 .pbs_flags = _BUS_SPACE_BIG_ENDIAN | 143 _BUS_SPACE_MEM_TYPE, 144 .pbs_offset = 0, 145 .pbs_base = 0x0c000000, 146 .pbs_limit = 0x0dffffff, 147 .pbs_extent = NULL, 148 }; 149 150 static char ex_storage[1][EXTENT_FIXED_STORAGE_SIZE(EXTMAP_RANGES)] 151 __attribute__((aligned(8))); 152 153 static bus_addr_t 154 wii_dma_phys_to_bus_mem(bus_dma_tag_t t, bus_addr_t addr) 155 { 156 return addr; 157 } 158 159 static bus_addr_t 160 wii_dma_bus_mem_to_phys(bus_dma_tag_t t, bus_addr_t addr) 161 { 162 return addr; 163 } 164 165 static int 166 wii_mem2_dmamem_alloc(bus_dma_tag_t t, bus_size_t size, bus_size_t alignment, 167 bus_size_t boundary, bus_dma_segment_t *segs, int nsegs, int *rsegs, 168 int flags) 169 { 170 struct mem_region *mem, *avail; 171 172 /* Restrict memory used for DMA to ranges in MEM2 */ 173 mem_regions(&mem, &avail); 174 if (mem[1].size == 0) { 175 return ENOMEM; 176 } 177 178 return _bus_dmamem_alloc_range(t, size, alignment, boundary, segs, 179 nsegs, rsegs, flags, mem[1].start, 180 mem[1].start + mem[1].size - PAGE_SIZE - 1); 181 } 182 183 struct powerpc_bus_dma_tag wii_bus_dma_tag = { 184 0, /* _bounce_thresh */ 185 _bus_dmamap_create, 186 _bus_dmamap_destroy, 187 _bus_dmamap_load, 188 _bus_dmamap_load_mbuf, 189 _bus_dmamap_load_uio, 190 _bus_dmamap_load_raw, 191 _bus_dmamap_unload, 192 _bus_dmamap_sync, 193 _bus_dmamem_alloc, 194 _bus_dmamem_free, 195 _bus_dmamem_map, 196 _bus_dmamem_unmap, 197 _bus_dmamem_mmap, 198 wii_dma_phys_to_bus_mem, 199 wii_dma_bus_mem_to_phys, 200 }; 201 202 struct powerpc_bus_dma_tag wii_mem2_bus_dma_tag = { 203 0, /* _bounce_thresh */ 204 _bus_dmamap_create, 205 _bus_dmamap_destroy, 206 _bus_dmamap_load, 207 _bus_dmamap_load_mbuf, 208 _bus_dmamap_load_uio, 209 _bus_dmamap_load_raw, 210 _bus_dmamap_unload, 211 _bus_dmamap_sync, 212 wii_mem2_dmamem_alloc, 213 _bus_dmamem_free, 214 _bus_dmamem_map, 215 _bus_dmamem_unmap, 216 _bus_dmamem_mmap, 217 wii_dma_phys_to_bus_mem, 218 wii_dma_bus_mem_to_phys, 219 }; 220 221 222 /* 223 * Global variables used here and there 224 */ 225 struct mem_region physmemr[3], availmemr[3]; 226 char wii_cmdline[1024]; 227 228 void initppc(u_int, u_int, u_int, void *); /* Called from locore */ 229 void wii_dolphin_elf_loader_id(void); 230 231 static void wii_setup(void); 232 static void init_decrementer(void); 233 234 void 235 initppc(u_int startkernel, u_int endkernel, u_int args, void *btinfo) 236 { 237 extern uint32_t ticks_per_sec; 238 extern uint32_t ticks_per_msec; 239 extern unsigned char edata[], end[]; 240 extern struct wii_argv wii_argv; 241 uint32_t mem2_start, mem2_end; 242 register_t scratch; 243 244 memset(&edata, 0, end - edata); /* clear BSS */ 245 246 wii_cmdline[0] = '\0'; 247 if (wii_argv.magic == WII_ARGV_MAGIC) { 248 void *ptr = (void *)(uintptr_t)(wii_argv.cmdline & ~0x80000000); 249 if (ptr != NULL) { 250 memcpy(wii_cmdline, ptr, wii_argv.length); 251 } 252 } else { 253 snprintf(wii_cmdline, sizeof(wii_cmdline), WII_DEFAULT_CMDLINE); 254 } 255 256 mem2_start = in32(GLOBAL_MEM2_AVAIL_START) & ~0x80000000; 257 mem2_end = in32(GLOBAL_MEM2_AVAIL_END) & ~0x80000000; 258 if (mem2_start < WII_MEM2_BASE) { 259 /* Must have been booted from MINI. */ 260 mem2_start = WII_MEM2_BASE + DSP_MEM_SIZE; 261 mem2_end = MINI_MEM2_START; 262 } 263 /* 264 * Clear GLOBAL_MEM2_AVAIL_{START,END} so we can detect the correct 265 * memory size when soft resetting from IOS to MINI. 266 */ 267 out32(GLOBAL_MEM2_AVAIL_START, 0); 268 out32(GLOBAL_MEM2_AVAIL_END, 0); 269 270 /* MEM1 24MB 1T-SRAM */ 271 physmemr[0].start = WII_MEM1_BASE; 272 physmemr[0].size = WII_MEM1_SIZE; 273 274 /* MEM2 64MB GDDR3 */ 275 physmemr[1].start = WII_MEM2_BASE; 276 physmemr[1].size = WII_MEM2_SIZE; 277 278 physmemr[2].size = 0; 279 280 /* MEM1 available memory */ 281 availmemr[0].start = ((endkernel & ~0x80000000) + PGOFSET) & ~PGOFSET; 282 availmemr[0].size = physmemr[0].size - availmemr[0].start; 283 /* External framebuffer is at the end of MEM1 */ 284 availmemr[0].size -= XFB_SIZE; 285 286 /* MEM2 available memory */ 287 availmemr[1].start = mem2_start; 288 availmemr[1].size = mem2_end - mem2_start; 289 290 availmemr[2].size = 0; 291 292 #ifdef BOOTHOWTO 293 /* 294 * boothowto 295 */ 296 boothowto = BOOTHOWTO; 297 #endif 298 299 /* HID4[L2_CCFI] must be set to 1 for correct operation of L2 cache */ 300 mtspr(IBM750CL_SPR_HID4, mfspr(IBM750CL_SPR_HID4) | L2_CCFI); 301 302 /* Configure L2 cache */ 303 l2cr_config = L2CR_L2E | L2CR_L2PE; 304 305 if (bus_space_init(&wii_mem_tag, "iomem", 306 ex_storage[0], sizeof(ex_storage[0]))) { 307 panic("bus_space_init failed"); 308 } 309 310 /* 311 * Initialize the BAT registers 312 */ 313 oea_batinit( 314 WII_IOMEM_BASE, BAT_BL_32M, 315 0); 316 317 /* 318 * Set up trap vectors 319 */ 320 oea_init(NULL); 321 322 /* 323 * Get CPU clock 324 */ 325 ticks_per_sec = TIMEBASE_FREQ_HZ; 326 ticks_per_msec = ticks_per_sec / 1000; 327 cpu_timebase = ticks_per_sec; 328 329 wii_setup(); 330 331 uvm_md_init(); 332 333 /* 334 * Initialize pmap module. 335 */ 336 pmap_bootstrap(startkernel, endkernel); 337 338 /* Now enable translation (and machine checks/recoverable interrupts) */ 339 __asm __volatile ("sync; mfmsr %0; ori %0,%0,%1; mtmsr %0; isync" 340 : "=r"(scratch) 341 : "K"(PSL_IR|PSL_DR|PSL_ME|PSL_RI)); 342 343 /* 344 * Setup decrementer 345 */ 346 init_decrementer(); 347 } 348 349 void 350 mem_regions(struct mem_region **mem, struct mem_region **avail) 351 { 352 *mem = physmemr; 353 *avail = availmemr; 354 } 355 356 /* 357 * Machine dependent startup code. 358 */ 359 void 360 cpu_startup(void) 361 { 362 extern void pi_init_intr(void); 363 364 oea_startup(NULL); 365 366 /* 367 * Now that we have VM, malloc()s are OK in bus_space. 368 */ 369 bus_space_mallocok(); 370 371 /* Set up interrupt controller */ 372 pic_init(); 373 pi_init_intr(); 374 oea_install_extint(pic_ext_intr); 375 } 376 377 /* 378 * No early console support. 379 */ 380 void 381 consinit(void) 382 { 383 #if NUKBD > 0 384 ukbd_cnattach(); 385 #endif 386 } 387 388 /* 389 * Halt or reboot the machine after syncing/dumping according to howto. 390 */ 391 void 392 cpu_reboot(int howto, char *what) 393 { 394 static int syncing; 395 extern void disable_intr(void); 396 397 boothowto = howto; 398 if (!cold && !(howto & RB_NOSYNC) && !syncing) { 399 syncing = 1; 400 vfs_shutdown(); /* sync */ 401 } 402 splhigh(); 403 if (!cold && (howto & RB_DUMP)) { 404 oea_dumpsys(); 405 } 406 pmf_system_shutdown(boothowto); 407 doshutdownhooks(); 408 409 disable_intr(); 410 411 /* Force halt on panic to capture the cause on screen. */ 412 if (panicstr != NULL) { 413 howto |= RB_HALT; 414 } 415 if ((howto & RB_POWERDOWN) == RB_POWERDOWN) { 416 printf("power off\n\n"); 417 out32(HW_GPIOB_OUT, in32(HW_GPIOB_OUT) | __BIT(GPIO_SHUTDOWN)); 418 delay(100000); 419 printf("power off failed!\n\n"); 420 } 421 if (howto & RB_HALT) { 422 printf("The operating system has halted.\n"); 423 printf("Please press the RESET button to reboot.\n"); 424 while (1) { 425 if ((in32(PI_INTERRUPT_CAUSE) & RESET_SWITCH_STATE) == 0) { 426 break; 427 } 428 } 429 } 430 431 printf("rebooting...\n\n"); 432 out32(HW_RESETS, in32(HW_RESETS) & ~RSTBINB); 433 while (1); 434 } 435 436 static void 437 wii_setup(void) 438 { 439 /* Turn on the drive slot LED. */ 440 wii_slot_led(true); 441 442 /* Enable PPC access to SHUTDOWN GPIO. */ 443 out32(HW_GPIO_OWNER, in32(HW_GPIO_OWNER) | __BIT(GPIO_SHUTDOWN)); 444 445 /* Enable PPC access to DI_SPIN GPIO. */ 446 out32(HW_GPIO_OWNER, in32(HW_GPIO_OWNER) | __BIT(GPIO_DI_SPIN)); 447 448 /* Enable PPC access to EXI bus. */ 449 out32(HW_AIPPROT, in32(HW_AIPPROT) | ENAHBIOPI); 450 451 /* Enable DVD video support. */ 452 out32(HW_COMPAT, in32(HW_COMPAT) & ~DVDVIDEO); 453 } 454 455 static void 456 init_decrementer(void) 457 { 458 extern uint32_t ns_per_tick; 459 extern uint32_t ticks_per_intr; 460 extern uint32_t ticks_per_sec; 461 int scratch, msr; 462 463 KASSERT(ticks_per_sec != 0); 464 465 __asm volatile ("mfmsr %0; andi. %1,%0,%2; mtmsr %1" 466 : "=r"(msr), "=r"(scratch) : "K"((u_short)~PSL_EE)); 467 ns_per_tick = 1000000000 / ticks_per_sec; 468 ticks_per_intr = ticks_per_sec / hz; 469 cpu_timebase = ticks_per_sec; 470 471 curcpu()->ci_lasttb = mftbl(); 472 473 mtspr(SPR_DEC, ticks_per_intr); 474 mtmsr(msr); 475 } 476