Home | History | Annotate | Line # | Download | only in wii
      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