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
ps3_probe(platform_t plat)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
ps3_attach(platform_t plat)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
ps3_mem_regions(platform_t plat,struct mem_region * phys,int * physsz,struct mem_region * avail_regions,int * availsz)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
ps3_timebase_freq(platform_t plat,struct cpuref * cpuref)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
ps3_smp_first_cpu(platform_t plat,struct cpuref * cpuref)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
ps3_smp_next_cpu(platform_t plat,struct cpuref * cpuref)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
ps3_smp_get_bsp(platform_t plat,struct cpuref * cpuref)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
ps3_smp_start_cpu(platform_t plat,struct pcpu * pc)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 *
ps3_smp_topo(platform_t plat)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
ps3_reset(platform_t plat)254 ps3_reset(platform_t plat)
255 {
256 lv1_panic(1);
257 }
258
259 static vm_offset_t
ps3_real_maxaddr(platform_t plat)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
ps3_cpu_idle(sbintime_t sbt)281 ps3_cpu_idle(sbintime_t sbt)
282 {
283 lv1_pause(0);
284 }
285
286