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