1 /* 2 * PowerPC CPU initialization for qemu. 3 * 4 * Copyright 2016, David Gibson, Red Hat Inc. <dgibson@redhat.com> 5 * 6 * This library is free software; you can redistribute it and/or 7 * modify it under the terms of the GNU Lesser General Public 8 * License as published by the Free Software Foundation; either 9 * version 2 of the License, or (at your option) any later version. 10 * 11 * This library is distributed in the hope that it will be useful, 12 * but WITHOUT ANY WARRANTY; without even the implied warranty of 13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 14 * Lesser General Public License for more details. 15 * 16 * You should have received a copy of the GNU Lesser General Public 17 * License along with this library; if not, see <http://www.gnu.org/licenses/>. 18 */ 19 20 #include "qemu/osdep.h" 21 #include "sysemu/hw_accel.h" 22 #include "sysemu/kvm.h" 23 #include "kvm_ppc.h" 24 #include "sysemu/cpus.h" 25 #include "qemu/error-report.h" 26 #include "qapi/error.h" 27 #include "qapi/visitor.h" 28 #include "cpu-models.h" 29 30 typedef struct { 31 const char *name; 32 uint32_t pvr; 33 uint64_t pcr; 34 uint64_t pcr_level; 35 int max_threads; 36 } CompatInfo; 37 38 static const CompatInfo compat_table[] = { 39 /* 40 * Ordered from oldest to newest - the code relies on this 41 */ 42 { /* POWER6, ISA2.05 */ 43 .name = "power6", 44 .pvr = CPU_POWERPC_LOGICAL_2_05, 45 .pcr = PCR_COMPAT_3_00 | PCR_COMPAT_2_07 | PCR_COMPAT_2_06 | 46 PCR_COMPAT_2_05 | PCR_TM_DIS | PCR_VSX_DIS, 47 .pcr_level = PCR_COMPAT_2_05, 48 .max_threads = 2, 49 }, 50 { /* POWER7, ISA2.06 */ 51 .name = "power7", 52 .pvr = CPU_POWERPC_LOGICAL_2_06, 53 .pcr = PCR_COMPAT_3_00 | PCR_COMPAT_2_07 | PCR_COMPAT_2_06 | PCR_TM_DIS, 54 .pcr_level = PCR_COMPAT_2_06, 55 .max_threads = 4, 56 }, 57 { 58 .name = "power7+", 59 .pvr = CPU_POWERPC_LOGICAL_2_06_PLUS, 60 .pcr = PCR_COMPAT_3_00 | PCR_COMPAT_2_07 | PCR_COMPAT_2_06 | PCR_TM_DIS, 61 .pcr_level = PCR_COMPAT_2_06, 62 .max_threads = 4, 63 }, 64 { /* POWER8, ISA2.07 */ 65 .name = "power8", 66 .pvr = CPU_POWERPC_LOGICAL_2_07, 67 .pcr = PCR_COMPAT_3_00 | PCR_COMPAT_2_07, 68 .pcr_level = PCR_COMPAT_2_07, 69 .max_threads = 8, 70 }, 71 { /* POWER9, ISA3.00 */ 72 .name = "power9", 73 .pvr = CPU_POWERPC_LOGICAL_3_00, 74 .pcr = PCR_COMPAT_3_00, 75 .pcr_level = PCR_COMPAT_3_00, 76 .max_threads = 4, 77 }, 78 }; 79 80 static const CompatInfo *compat_by_pvr(uint32_t pvr) 81 { 82 int i; 83 84 for (i = 0; i < ARRAY_SIZE(compat_table); i++) { 85 if (compat_table[i].pvr == pvr) { 86 return &compat_table[i]; 87 } 88 } 89 return NULL; 90 } 91 92 bool ppc_check_compat(PowerPCCPU *cpu, uint32_t compat_pvr, 93 uint32_t min_compat_pvr, uint32_t max_compat_pvr) 94 { 95 PowerPCCPUClass *pcc = POWERPC_CPU_GET_CLASS(cpu); 96 const CompatInfo *compat = compat_by_pvr(compat_pvr); 97 const CompatInfo *min = compat_by_pvr(min_compat_pvr); 98 const CompatInfo *max = compat_by_pvr(max_compat_pvr); 99 100 #if !defined(CONFIG_USER_ONLY) 101 g_assert(cpu->vhyp); 102 #endif 103 g_assert(!min_compat_pvr || min); 104 g_assert(!max_compat_pvr || max); 105 106 if (!compat) { 107 /* Not a recognized logical PVR */ 108 return false; 109 } 110 if ((min && (compat < min)) || (max && (compat > max))) { 111 /* Outside specified range */ 112 return false; 113 } 114 if (!(pcc->pcr_supported & compat->pcr_level)) { 115 /* Not supported by this CPU */ 116 return false; 117 } 118 return true; 119 } 120 121 void ppc_set_compat(PowerPCCPU *cpu, uint32_t compat_pvr, Error **errp) 122 { 123 const CompatInfo *compat = compat_by_pvr(compat_pvr); 124 CPUPPCState *env = &cpu->env; 125 PowerPCCPUClass *pcc = POWERPC_CPU_GET_CLASS(cpu); 126 uint64_t pcr; 127 128 if (!compat_pvr) { 129 pcr = 0; 130 } else if (!compat) { 131 error_setg(errp, "Unknown compatibility PVR 0x%08"PRIx32, compat_pvr); 132 return; 133 } else if (!ppc_check_compat(cpu, compat_pvr, 0, 0)) { 134 error_setg(errp, "Compatibility PVR 0x%08"PRIx32" not valid for CPU", 135 compat_pvr); 136 return; 137 } else { 138 pcr = compat->pcr; 139 } 140 141 cpu_synchronize_state(CPU(cpu)); 142 143 cpu->compat_pvr = compat_pvr; 144 env->spr[SPR_PCR] = pcr & pcc->pcr_mask; 145 146 if (kvm_enabled()) { 147 int ret = kvmppc_set_compat(cpu, cpu->compat_pvr); 148 if (ret < 0) { 149 error_setg_errno(errp, -ret, 150 "Unable to set CPU compatibility mode in KVM"); 151 } 152 } 153 } 154 155 typedef struct { 156 uint32_t compat_pvr; 157 Error *err; 158 } SetCompatState; 159 160 static void do_set_compat(CPUState *cs, run_on_cpu_data arg) 161 { 162 PowerPCCPU *cpu = POWERPC_CPU(cs); 163 SetCompatState *s = arg.host_ptr; 164 165 ppc_set_compat(cpu, s->compat_pvr, &s->err); 166 } 167 168 void ppc_set_compat_all(uint32_t compat_pvr, Error **errp) 169 { 170 CPUState *cs; 171 172 CPU_FOREACH(cs) { 173 SetCompatState s = { 174 .compat_pvr = compat_pvr, 175 .err = NULL, 176 }; 177 178 run_on_cpu(cs, do_set_compat, RUN_ON_CPU_HOST_PTR(&s)); 179 180 if (s.err) { 181 error_propagate(errp, s.err); 182 return; 183 } 184 } 185 } 186 187 int ppc_compat_max_threads(PowerPCCPU *cpu) 188 { 189 const CompatInfo *compat = compat_by_pvr(cpu->compat_pvr); 190 int n_threads = CPU(cpu)->nr_threads; 191 192 if (cpu->compat_pvr) { 193 g_assert(compat); 194 n_threads = MIN(n_threads, compat->max_threads); 195 } 196 197 return n_threads; 198 } 199 200 static void ppc_compat_prop_get(Object *obj, Visitor *v, const char *name, 201 void *opaque, Error **errp) 202 { 203 uint32_t compat_pvr = *((uint32_t *)opaque); 204 const char *value; 205 206 if (!compat_pvr) { 207 value = ""; 208 } else { 209 const CompatInfo *compat = compat_by_pvr(compat_pvr); 210 211 g_assert(compat); 212 213 value = compat->name; 214 } 215 216 visit_type_str(v, name, (char **)&value, errp); 217 } 218 219 static void ppc_compat_prop_set(Object *obj, Visitor *v, const char *name, 220 void *opaque, Error **errp) 221 { 222 Error *local_err = NULL; 223 char *value; 224 uint32_t compat_pvr; 225 226 visit_type_str(v, name, &value, &local_err); 227 if (local_err) { 228 error_propagate(errp, local_err); 229 return; 230 } 231 232 if (strcmp(value, "") == 0) { 233 compat_pvr = 0; 234 } else { 235 int i; 236 const CompatInfo *compat = NULL; 237 238 for (i = 0; i < ARRAY_SIZE(compat_table); i++) { 239 if (strcmp(value, compat_table[i].name) == 0) { 240 compat = &compat_table[i]; 241 break; 242 243 } 244 } 245 246 if (!compat) { 247 error_setg(errp, "Invalid compatibility mode \"%s\"", value); 248 goto out; 249 } 250 compat_pvr = compat->pvr; 251 } 252 253 *((uint32_t *)opaque) = compat_pvr; 254 255 out: 256 g_free(value); 257 } 258 259 void ppc_compat_add_property(Object *obj, const char *name, 260 uint32_t *compat_pvr, const char *basedesc, 261 Error **errp) 262 { 263 Error *local_err = NULL; 264 gchar *namesv[ARRAY_SIZE(compat_table) + 1]; 265 gchar *names, *desc; 266 int i; 267 268 object_property_add(obj, name, "string", 269 ppc_compat_prop_get, ppc_compat_prop_set, NULL, 270 compat_pvr, &local_err); 271 if (local_err) { 272 goto out; 273 } 274 275 for (i = 0; i < ARRAY_SIZE(compat_table); i++) { 276 /* 277 * Have to discard const here, because g_strjoinv() takes 278 * (gchar **), not (const gchar **) :( 279 */ 280 namesv[i] = (gchar *)compat_table[i].name; 281 } 282 namesv[ARRAY_SIZE(compat_table)] = NULL; 283 284 names = g_strjoinv(", ", namesv); 285 desc = g_strdup_printf("%s. Valid values are %s.", basedesc, names); 286 object_property_set_description(obj, name, desc, &local_err); 287 288 g_free(names); 289 g_free(desc); 290 291 out: 292 error_propagate(errp, local_err); 293 } 294