1 /*- 2 * SPDX-License-Identifier: BSD-2-Clause 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/param.h> 30 #include <sys/systm.h> 31 #include <sys/kernel.h> 32 #include <sys/bus.h> 33 #include <sys/pcpu.h> 34 #include <sys/proc.h> 35 #include <sys/reboot.h> 36 #include <sys/smp.h> 37 38 #include <vm/vm.h> 39 #include <vm/pmap.h> 40 41 #include <machine/bus.h> 42 #include <machine/cpu.h> 43 #include <machine/hid.h> 44 #include <machine/platform.h> 45 #include <machine/platformvar.h> 46 #include <machine/smp.h> 47 #include <machine/spr.h> 48 #include <machine/vmparam.h> 49 50 #include <dev/ofw/openfirm.h> 51 52 #include "platform_if.h" 53 #include "ps3-hvcall.h" 54 55 #ifdef SMP 56 extern void *ap_pcpu; 57 #endif 58 59 static int ps3_probe(platform_t); 60 static int ps3_attach(platform_t); 61 static void ps3_mem_regions(platform_t, struct mem_region *phys, int *physsz, 62 struct mem_region *avail, int *availsz); 63 static vm_offset_t ps3_real_maxaddr(platform_t); 64 static u_long ps3_timebase_freq(platform_t, struct cpuref *cpuref); 65 #ifdef SMP 66 static int ps3_smp_first_cpu(platform_t, struct cpuref *cpuref); 67 static int ps3_smp_next_cpu(platform_t, struct cpuref *cpuref); 68 static int ps3_smp_get_bsp(platform_t, struct cpuref *cpuref); 69 static int ps3_smp_start_cpu(platform_t, struct pcpu *cpu); 70 static void ps3_smp_probe_threads(platform_t); 71 static struct cpu_group *ps3_smp_topo(platform_t); 72 #endif 73 static void ps3_reset(platform_t); 74 static void ps3_cpu_idle(sbintime_t); 75 76 static platform_method_t ps3_methods[] = { 77 PLATFORMMETHOD(platform_probe, ps3_probe), 78 PLATFORMMETHOD(platform_attach, ps3_attach), 79 PLATFORMMETHOD(platform_mem_regions, ps3_mem_regions), 80 PLATFORMMETHOD(platform_real_maxaddr, ps3_real_maxaddr), 81 PLATFORMMETHOD(platform_timebase_freq, ps3_timebase_freq), 82 83 #ifdef SMP 84 PLATFORMMETHOD(platform_smp_first_cpu, ps3_smp_first_cpu), 85 PLATFORMMETHOD(platform_smp_next_cpu, ps3_smp_next_cpu), 86 PLATFORMMETHOD(platform_smp_get_bsp, ps3_smp_get_bsp), 87 PLATFORMMETHOD(platform_smp_start_cpu, ps3_smp_start_cpu), 88 PLATFORMMETHOD(platform_smp_probe_threads, ps3_smp_probe_threads), 89 PLATFORMMETHOD(platform_smp_topo, ps3_smp_topo), 90 #endif 91 92 PLATFORMMETHOD(platform_reset, ps3_reset), 93 94 PLATFORMMETHOD_END 95 }; 96 97 static platform_def_t ps3_platform = { 98 "ps3", 99 ps3_methods, 100 0 101 }; 102 103 PLATFORM_DEF(ps3_platform); 104 105 static int ps3_boot_pir = 0; 106 107 static int 108 ps3_probe(platform_t plat) 109 { 110 phandle_t root; 111 char compatible[64]; 112 113 root = OF_finddevice("/"); 114 if (OF_getprop(root, "compatible", compatible, sizeof(compatible)) <= 0) 115 return (BUS_PROBE_NOWILDCARD); 116 117 if (strncmp(compatible, "sony,ps3", sizeof(compatible)) != 0) 118 return (BUS_PROBE_NOWILDCARD); 119 120 return (BUS_PROBE_SPECIFIC); 121 } 122 123 static int 124 ps3_attach(platform_t plat) 125 { 126 127 pmap_mmu_install("mmu_ps3", BUS_PROBE_SPECIFIC); 128 cpu_idle_hook = ps3_cpu_idle; 129 130 /* Record our PIR at boot for later */ 131 ps3_boot_pir = mfspr(SPR_PIR); 132 133 return (0); 134 } 135 136 void 137 ps3_mem_regions(platform_t plat, struct mem_region *phys, int *physsz, 138 struct mem_region *avail_regions, int *availsz) 139 { 140 uint64_t lpar_id, junk; 141 int i; 142 143 /* Prefer device tree information if available */ 144 if (OF_finddevice("/") != -1) { 145 ofw_mem_regions(phys, physsz, avail_regions, availsz); 146 } else { 147 /* Real mode memory region is first segment */ 148 phys[0].mr_start = 0; 149 phys[0].mr_size = ps3_real_maxaddr(plat); 150 *physsz = *availsz = 1; 151 avail_regions[0] = phys[0]; 152 } 153 154 /* Now get extended memory region */ 155 lv1_get_logical_partition_id(&lpar_id); 156 lv1_get_repository_node_value(lpar_id, 157 lv1_repository_string("bi") >> 32, 158 lv1_repository_string("rgntotal"), 0, 0, 159 &phys[*physsz].mr_size, &junk); 160 for (i = 0; i < *physsz; i++) 161 phys[*physsz].mr_size -= phys[i].mr_size; 162 163 /* Convert to maximum amount we can allocate in 16 MB pages */ 164 phys[*physsz].mr_size -= phys[*physsz].mr_size % (16*1024*1024); 165 166 /* Allocate extended memory region */ 167 lv1_allocate_memory(phys[*physsz].mr_size, 24 /* 16 MB pages */, 168 0, 0x04 /* any address */, &phys[*physsz].mr_start, &junk); 169 avail_regions[*availsz] = phys[*physsz]; 170 (*physsz)++; 171 (*availsz)++; 172 } 173 174 static u_long 175 ps3_timebase_freq(platform_t plat, struct cpuref *cpuref) 176 { 177 uint64_t ticks, node_id, junk; 178 179 lv1_get_repository_node_value(PS3_LPAR_ID_PME, 180 lv1_repository_string("be") >> 32, 0, 0, 0, &node_id, &junk); 181 lv1_get_repository_node_value(PS3_LPAR_ID_PME, 182 lv1_repository_string("be") >> 32, node_id, 183 lv1_repository_string("clock"), 0, &ticks, &junk); 184 185 return (ticks); 186 } 187 188 #ifdef SMP 189 static int 190 ps3_smp_first_cpu(platform_t plat, struct cpuref *cpuref) 191 { 192 193 cpuref->cr_cpuid = 0; 194 cpuref->cr_hwref = ps3_boot_pir; 195 196 return (0); 197 } 198 199 static int 200 ps3_smp_next_cpu(platform_t plat, struct cpuref *cpuref) 201 { 202 203 if (cpuref->cr_cpuid >= 1) 204 return (ENOENT); 205 206 cpuref->cr_cpuid++; 207 cpuref->cr_hwref = !ps3_boot_pir; 208 209 return (0); 210 } 211 212 static int 213 ps3_smp_get_bsp(platform_t plat, struct cpuref *cpuref) 214 { 215 216 cpuref->cr_cpuid = 0; 217 cpuref->cr_hwref = ps3_boot_pir; 218 219 return (0); 220 } 221 222 static int 223 ps3_smp_start_cpu(platform_t plat, struct pcpu *pc) 224 { 225 /* kernel is spinning on 0x40 == -1 right now */ 226 volatile uint32_t *secondary_spin_sem = 227 (uint32_t *)PHYS_TO_DMAP((uintptr_t)0x40); 228 int remote_pir = pc->pc_hwref; 229 int timeout; 230 231 ap_pcpu = pc; 232 233 /* Try both PIR values, looping a few times: the HV likes moving us */ 234 timeout = 10000; 235 while (!pc->pc_awake && timeout--) { 236 *secondary_spin_sem = remote_pir; 237 powerpc_sync(); 238 DELAY(100); 239 remote_pir = !remote_pir; 240 } 241 242 return ((pc->pc_awake) ? 0 : EBUSY); 243 } 244 245 static void 246 ps3_smp_probe_threads(platform_t plat) 247 { 248 mp_ncores = 1; 249 smp_threads_per_core = 2; 250 } 251 252 static struct cpu_group * 253 ps3_smp_topo(platform_t plat) 254 { 255 return (smp_topo_1level(CG_SHARE_L1, 2, CG_FLAG_SMT)); 256 } 257 #endif 258 259 static void 260 ps3_reset(platform_t plat) 261 { 262 lv1_panic(1); 263 } 264 265 static vm_offset_t 266 ps3_real_maxaddr(platform_t plat) 267 { 268 uint64_t lpar_id, junk, ppe_id; 269 static uint64_t rm_maxaddr = 0; 270 271 if (rm_maxaddr == 0) { 272 /* Get real mode memory region */ 273 lv1_get_logical_partition_id(&lpar_id); 274 lv1_get_logical_ppe_id(&ppe_id); 275 276 lv1_get_repository_node_value(lpar_id, 277 lv1_repository_string("bi") >> 32, 278 lv1_repository_string("pu"), 279 ppe_id, lv1_repository_string("rm_size"), 280 &rm_maxaddr, &junk); 281 } 282 283 return (rm_maxaddr); 284 } 285 286 static void 287 ps3_cpu_idle(sbintime_t sbt) 288 { 289 lv1_pause(0); 290 } 291