1 /*- 2 * SPDX-License-Identifier: BSD-2-Clause-FreeBSD 3 * 4 * Copyright (c) 2010 Nathan Whitehorn 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 11 * 1. Redistributions of source code must retain the above copyright 12 * notice, this list of conditions and the following disclaimer. 13 * 2. Redistributions in binary form must reproduce the above copyright 14 * notice, this list of conditions and the following disclaimer in the 15 * documentation and/or other materials provided with the distribution. 16 * 17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 18 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 19 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 20 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 21 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 22 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 26 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 27 */ 28 29 #include <sys/cdefs.h> 30 __FBSDID("$FreeBSD$"); 31 32 #include <sys/param.h> 33 #include <sys/systm.h> 34 #include <sys/kernel.h> 35 #include <sys/bus.h> 36 #include <sys/pcpu.h> 37 #include <sys/proc.h> 38 #include <sys/reboot.h> 39 #include <sys/smp.h> 40 41 #include <vm/vm.h> 42 #include <vm/pmap.h> 43 44 #include <machine/bus.h> 45 #include <machine/cpu.h> 46 #include <machine/hid.h> 47 #include <machine/platform.h> 48 #include <machine/platformvar.h> 49 #include <machine/smp.h> 50 #include <machine/spr.h> 51 #include <machine/vmparam.h> 52 53 #include <dev/ofw/openfirm.h> 54 55 #include "platform_if.h" 56 #include "ps3-hvcall.h" 57 58 #ifdef SMP 59 extern void *ap_pcpu; 60 #endif 61 62 static int ps3_probe(platform_t); 63 static int ps3_attach(platform_t); 64 static void ps3_mem_regions(platform_t, struct mem_region *phys, int *physsz, 65 struct mem_region *avail, int *availsz); 66 static vm_offset_t ps3_real_maxaddr(platform_t); 67 static u_long ps3_timebase_freq(platform_t, struct cpuref *cpuref); 68 #ifdef SMP 69 static int ps3_smp_first_cpu(platform_t, struct cpuref *cpuref); 70 static int ps3_smp_next_cpu(platform_t, struct cpuref *cpuref); 71 static int ps3_smp_get_bsp(platform_t, struct cpuref *cpuref); 72 static int ps3_smp_start_cpu(platform_t, struct pcpu *cpu); 73 static struct cpu_group *ps3_smp_topo(platform_t); 74 #endif 75 static void ps3_reset(platform_t); 76 static void ps3_cpu_idle(sbintime_t); 77 78 static platform_method_t ps3_methods[] = { 79 PLATFORMMETHOD(platform_probe, ps3_probe), 80 PLATFORMMETHOD(platform_attach, ps3_attach), 81 PLATFORMMETHOD(platform_mem_regions, ps3_mem_regions), 82 PLATFORMMETHOD(platform_real_maxaddr, ps3_real_maxaddr), 83 PLATFORMMETHOD(platform_timebase_freq, ps3_timebase_freq), 84 85 #ifdef SMP 86 PLATFORMMETHOD(platform_smp_first_cpu, ps3_smp_first_cpu), 87 PLATFORMMETHOD(platform_smp_next_cpu, ps3_smp_next_cpu), 88 PLATFORMMETHOD(platform_smp_get_bsp, ps3_smp_get_bsp), 89 PLATFORMMETHOD(platform_smp_start_cpu, ps3_smp_start_cpu), 90 PLATFORMMETHOD(platform_smp_topo, ps3_smp_topo), 91 #endif 92 93 PLATFORMMETHOD(platform_reset, ps3_reset), 94 95 PLATFORMMETHOD_END 96 }; 97 98 static platform_def_t ps3_platform = { 99 "ps3", 100 ps3_methods, 101 0 102 }; 103 104 PLATFORM_DEF(ps3_platform); 105 106 static int ps3_boot_pir = 0; 107 108 static int 109 ps3_probe(platform_t plat) 110 { 111 phandle_t root; 112 char compatible[64]; 113 114 root = OF_finddevice("/"); 115 if (OF_getprop(root, "compatible", compatible, sizeof(compatible)) <= 0) 116 return (BUS_PROBE_NOWILDCARD); 117 118 if (strncmp(compatible, "sony,ps3", sizeof(compatible)) != 0) 119 return (BUS_PROBE_NOWILDCARD); 120 121 return (BUS_PROBE_SPECIFIC); 122 } 123 124 static int 125 ps3_attach(platform_t plat) 126 { 127 128 pmap_mmu_install("mmu_ps3", BUS_PROBE_SPECIFIC); 129 cpu_idle_hook = ps3_cpu_idle; 130 131 /* Record our PIR at boot for later */ 132 ps3_boot_pir = mfspr(SPR_PIR); 133 134 return (0); 135 } 136 137 void 138 ps3_mem_regions(platform_t plat, struct mem_region *phys, int *physsz, 139 struct mem_region *avail_regions, int *availsz) 140 { 141 uint64_t lpar_id, junk; 142 int i; 143 144 /* Prefer device tree information if available */ 145 if (OF_finddevice("/") != -1) { 146 ofw_mem_regions(phys, physsz, avail_regions, availsz); 147 } else { 148 /* Real mode memory region is first segment */ 149 phys[0].mr_start = 0; 150 phys[0].mr_size = ps3_real_maxaddr(plat); 151 *physsz = *availsz = 1; 152 avail_regions[0] = phys[0]; 153 } 154 155 /* Now get extended memory region */ 156 lv1_get_logical_partition_id(&lpar_id); 157 lv1_get_repository_node_value(lpar_id, 158 lv1_repository_string("bi") >> 32, 159 lv1_repository_string("rgntotal"), 0, 0, 160 &phys[*physsz].mr_size, &junk); 161 for (i = 0; i < *physsz; i++) 162 phys[*physsz].mr_size -= phys[i].mr_size; 163 164 /* Convert to maximum amount we can allocate in 16 MB pages */ 165 phys[*physsz].mr_size -= phys[*physsz].mr_size % (16*1024*1024); 166 167 /* Allocate extended memory region */ 168 lv1_allocate_memory(phys[*physsz].mr_size, 24 /* 16 MB pages */, 169 0, 0x04 /* any address */, &phys[*physsz].mr_start, &junk); 170 avail_regions[*availsz] = phys[*physsz]; 171 (*physsz)++; 172 (*availsz)++; 173 } 174 175 static u_long 176 ps3_timebase_freq(platform_t plat, struct cpuref *cpuref) 177 { 178 uint64_t ticks, node_id, junk; 179 180 lv1_get_repository_node_value(PS3_LPAR_ID_PME, 181 lv1_repository_string("be") >> 32, 0, 0, 0, &node_id, &junk); 182 lv1_get_repository_node_value(PS3_LPAR_ID_PME, 183 lv1_repository_string("be") >> 32, node_id, 184 lv1_repository_string("clock"), 0, &ticks, &junk); 185 186 return (ticks); 187 } 188 189 #ifdef SMP 190 static int 191 ps3_smp_first_cpu(platform_t plat, struct cpuref *cpuref) 192 { 193 194 cpuref->cr_cpuid = 0; 195 cpuref->cr_hwref = ps3_boot_pir; 196 197 return (0); 198 } 199 200 static int 201 ps3_smp_next_cpu(platform_t plat, struct cpuref *cpuref) 202 { 203 204 if (cpuref->cr_cpuid >= 1) 205 return (ENOENT); 206 207 cpuref->cr_cpuid++; 208 cpuref->cr_hwref = !ps3_boot_pir; 209 210 return (0); 211 } 212 213 static int 214 ps3_smp_get_bsp(platform_t plat, struct cpuref *cpuref) 215 { 216 217 cpuref->cr_cpuid = 0; 218 cpuref->cr_hwref = ps3_boot_pir; 219 220 return (0); 221 } 222 223 static int 224 ps3_smp_start_cpu(platform_t plat, struct pcpu *pc) 225 { 226 /* kernel is spinning on 0x40 == -1 right now */ 227 volatile uint32_t *secondary_spin_sem = 228 (uint32_t *)PHYS_TO_DMAP((uintptr_t)0x40); 229 int remote_pir = pc->pc_hwref; 230 int timeout; 231 232 ap_pcpu = pc; 233 234 /* Try both PIR values, looping a few times: the HV likes moving us */ 235 timeout = 10000; 236 while (!pc->pc_awake && timeout--) { 237 *secondary_spin_sem = remote_pir; 238 powerpc_sync(); 239 DELAY(100); 240 remote_pir = !remote_pir; 241 } 242 243 return ((pc->pc_awake) ? 0 : EBUSY); 244 } 245 246 static struct cpu_group * 247 ps3_smp_topo(platform_t plat) 248 { 249 return (smp_topo_1level(CG_SHARE_L1, 2, CG_FLAG_SMT)); 250 } 251 #endif 252 253 static void 254 ps3_reset(platform_t plat) 255 { 256 lv1_panic(1); 257 } 258 259 static vm_offset_t 260 ps3_real_maxaddr(platform_t plat) 261 { 262 uint64_t lpar_id, junk, ppe_id; 263 static uint64_t rm_maxaddr = 0; 264 265 if (rm_maxaddr == 0) { 266 /* Get real mode memory region */ 267 lv1_get_logical_partition_id(&lpar_id); 268 lv1_get_logical_ppe_id(&ppe_id); 269 270 lv1_get_repository_node_value(lpar_id, 271 lv1_repository_string("bi") >> 32, 272 lv1_repository_string("pu"), 273 ppe_id, lv1_repository_string("rm_size"), 274 &rm_maxaddr, &junk); 275 } 276 277 return (rm_maxaddr); 278 } 279 280 static void 281 ps3_cpu_idle(sbintime_t sbt) 282 { 283 lv1_pause(0); 284 } 285 286