xref: /openbmc/qemu/hw/ppc/spapr_caps.c (revision 979a8902)
1 /*
2  * QEMU PowerPC pSeries Logical Partition capabilities handling
3  *
4  * Copyright (c) 2017 David Gibson, Red Hat Inc.
5  *
6  * Permission is hereby granted, free of charge, to any person obtaining a copy
7  * of this software and associated documentation files (the "Software"), to deal
8  * in the Software without restriction, including without limitation the rights
9  * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
10  * copies of the Software, and to permit persons to whom the Software is
11  * furnished to do so, subject to the following conditions:
12  *
13  * The above copyright notice and this permission notice shall be included in
14  * all copies or substantial portions of the Software.
15  *
16  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
19  * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21  * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
22  * THE SOFTWARE.
23  */
24 
25 #include "qemu/osdep.h"
26 #include "qemu/error-report.h"
27 #include "qapi/error.h"
28 #include "qapi/visitor.h"
29 #include "sysemu/hw_accel.h"
30 #include "exec/ram_addr.h"
31 #include "target/ppc/cpu.h"
32 #include "target/ppc/mmu-hash64.h"
33 #include "cpu-models.h"
34 #include "kvm_ppc.h"
35 #include "migration/vmstate.h"
36 #include "sysemu/qtest.h"
37 #include "sysemu/tcg.h"
38 
39 #include "hw/ppc/spapr.h"
40 
41 typedef struct SpaprCapPossible {
42     int num;            /* size of vals array below */
43     const char *help;   /* help text for vals */
44     /*
45      * Note:
46      * - because of the way compatibility is determined vals MUST be ordered
47      *   such that later options are a superset of all preceding options.
48      * - the order of vals must be preserved, that is their index is important,
49      *   however vals may be added to the end of the list so long as the above
50      *   point is observed
51      */
52     const char *vals[];
53 } SpaprCapPossible;
54 
55 typedef struct SpaprCapabilityInfo {
56     const char *name;
57     const char *description;
58     int index;
59 
60     /* Getter and Setter Function Pointers */
61     ObjectPropertyAccessor *get;
62     ObjectPropertyAccessor *set;
63     const char *type;
64     /* Possible values if this is a custom string type */
65     SpaprCapPossible *possible;
66     /* Make sure the virtual hardware can support this capability */
67     void (*apply)(SpaprMachineState *spapr, uint8_t val, Error **errp);
68     void (*cpu_apply)(SpaprMachineState *spapr, PowerPCCPU *cpu,
69                       uint8_t val, Error **errp);
70     bool (*migrate_needed)(void *opaque);
71 } SpaprCapabilityInfo;
72 
73 static void spapr_cap_get_bool(Object *obj, Visitor *v, const char *name,
74                                void *opaque, Error **errp)
75 {
76     SpaprCapabilityInfo *cap = opaque;
77     SpaprMachineState *spapr = SPAPR_MACHINE(obj);
78     bool value = spapr_get_cap(spapr, cap->index) == SPAPR_CAP_ON;
79 
80     visit_type_bool(v, name, &value, errp);
81 }
82 
83 static void spapr_cap_set_bool(Object *obj, Visitor *v, const char *name,
84                                void *opaque, Error **errp)
85 {
86     SpaprCapabilityInfo *cap = opaque;
87     SpaprMachineState *spapr = SPAPR_MACHINE(obj);
88     bool value;
89     Error *local_err = NULL;
90 
91     visit_type_bool(v, name, &value, &local_err);
92     if (local_err) {
93         error_propagate(errp, local_err);
94         return;
95     }
96 
97     spapr->cmd_line_caps[cap->index] = true;
98     spapr->eff.caps[cap->index] = value ? SPAPR_CAP_ON : SPAPR_CAP_OFF;
99 }
100 
101 
102 static void  spapr_cap_get_string(Object *obj, Visitor *v, const char *name,
103                                   void *opaque, Error **errp)
104 {
105     SpaprCapabilityInfo *cap = opaque;
106     SpaprMachineState *spapr = SPAPR_MACHINE(obj);
107     char *val = NULL;
108     uint8_t value = spapr_get_cap(spapr, cap->index);
109 
110     if (value >= cap->possible->num) {
111         error_setg(errp, "Invalid value (%d) for cap-%s", value, cap->name);
112         return;
113     }
114 
115     val = g_strdup(cap->possible->vals[value]);
116 
117     visit_type_str(v, name, &val, errp);
118     g_free(val);
119 }
120 
121 static void spapr_cap_set_string(Object *obj, Visitor *v, const char *name,
122                                  void *opaque, Error **errp)
123 {
124     SpaprCapabilityInfo *cap = opaque;
125     SpaprMachineState *spapr = SPAPR_MACHINE(obj);
126     Error *local_err = NULL;
127     uint8_t i;
128     char *val;
129 
130     visit_type_str(v, name, &val, &local_err);
131     if (local_err) {
132         error_propagate(errp, local_err);
133         return;
134     }
135 
136     if (!strcmp(val, "?")) {
137         error_setg(errp, "%s", cap->possible->help);
138         goto out;
139     }
140     for (i = 0; i < cap->possible->num; i++) {
141         if (!strcasecmp(val, cap->possible->vals[i])) {
142             spapr->cmd_line_caps[cap->index] = true;
143             spapr->eff.caps[cap->index] = i;
144             goto out;
145         }
146     }
147 
148     error_setg(errp, "Invalid capability mode \"%s\" for cap-%s", val,
149                cap->name);
150 out:
151     g_free(val);
152 }
153 
154 static void spapr_cap_get_pagesize(Object *obj, Visitor *v, const char *name,
155                                    void *opaque, Error **errp)
156 {
157     SpaprCapabilityInfo *cap = opaque;
158     SpaprMachineState *spapr = SPAPR_MACHINE(obj);
159     uint8_t val = spapr_get_cap(spapr, cap->index);
160     uint64_t pagesize = (1ULL << val);
161 
162     visit_type_size(v, name, &pagesize, errp);
163 }
164 
165 static void spapr_cap_set_pagesize(Object *obj, Visitor *v, const char *name,
166                                    void *opaque, Error **errp)
167 {
168     SpaprCapabilityInfo *cap = opaque;
169     SpaprMachineState *spapr = SPAPR_MACHINE(obj);
170     uint64_t pagesize;
171     uint8_t val;
172     Error *local_err = NULL;
173 
174     visit_type_size(v, name, &pagesize, &local_err);
175     if (local_err) {
176         error_propagate(errp, local_err);
177         return;
178     }
179 
180     if (!is_power_of_2(pagesize)) {
181         error_setg(errp, "cap-%s must be a power of 2", cap->name);
182         return;
183     }
184 
185     val = ctz64(pagesize);
186     spapr->cmd_line_caps[cap->index] = true;
187     spapr->eff.caps[cap->index] = val;
188 }
189 
190 static void cap_htm_apply(SpaprMachineState *spapr, uint8_t val, Error **errp)
191 {
192     if (!val) {
193         /* TODO: We don't support disabling htm yet */
194         return;
195     }
196     if (tcg_enabled()) {
197         error_setg(errp,
198                    "No Transactional Memory support in TCG,"
199                    " try appending -machine cap-htm=off");
200     } else if (kvm_enabled() && !kvmppc_has_cap_htm()) {
201         error_setg(errp,
202 "KVM implementation does not support Transactional Memory,"
203                    " try appending -machine cap-htm=off"
204             );
205     }
206 }
207 
208 static void cap_vsx_apply(SpaprMachineState *spapr, uint8_t val, Error **errp)
209 {
210     PowerPCCPU *cpu = POWERPC_CPU(first_cpu);
211     CPUPPCState *env = &cpu->env;
212 
213     if (!val) {
214         /* TODO: We don't support disabling vsx yet */
215         return;
216     }
217     /* Allowable CPUs in spapr_cpu_core.c should already have gotten
218      * rid of anything that doesn't do VMX */
219     g_assert(env->insns_flags & PPC_ALTIVEC);
220     if (!(env->insns_flags2 & PPC2_VSX)) {
221         error_setg(errp, "VSX support not available,"
222                    " try appending -machine cap-vsx=off");
223     }
224 }
225 
226 static void cap_dfp_apply(SpaprMachineState *spapr, uint8_t val, Error **errp)
227 {
228     PowerPCCPU *cpu = POWERPC_CPU(first_cpu);
229     CPUPPCState *env = &cpu->env;
230 
231     if (!val) {
232         /* TODO: We don't support disabling dfp yet */
233         return;
234     }
235     if (!(env->insns_flags2 & PPC2_DFP)) {
236         error_setg(errp, "DFP support not available,"
237                    " try appending -machine cap-dfp=off");
238     }
239 }
240 
241 SpaprCapPossible cap_cfpc_possible = {
242     .num = 3,
243     .vals = {"broken", "workaround", "fixed"},
244     .help = "broken - no protection, workaround - workaround available,"
245             " fixed - fixed in hardware",
246 };
247 
248 static void cap_safe_cache_apply(SpaprMachineState *spapr, uint8_t val,
249                                  Error **errp)
250 {
251     Error *local_err = NULL;
252     uint8_t kvm_val =  kvmppc_get_cap_safe_cache();
253 
254     if (tcg_enabled() && val) {
255         /* TCG only supports broken, allow other values and print a warning */
256         error_setg(&local_err,
257                    "TCG doesn't support requested feature, cap-cfpc=%s",
258                    cap_cfpc_possible.vals[val]);
259     } else if (kvm_enabled() && (val > kvm_val)) {
260         error_setg(errp,
261                    "Requested safe cache capability level not supported by kvm,"
262                    " try appending -machine cap-cfpc=%s",
263                    cap_cfpc_possible.vals[kvm_val]);
264     }
265 
266     if (local_err != NULL)
267         warn_report_err(local_err);
268 }
269 
270 SpaprCapPossible cap_sbbc_possible = {
271     .num = 3,
272     .vals = {"broken", "workaround", "fixed"},
273     .help = "broken - no protection, workaround - workaround available,"
274             " fixed - fixed in hardware",
275 };
276 
277 static void cap_safe_bounds_check_apply(SpaprMachineState *spapr, uint8_t val,
278                                         Error **errp)
279 {
280     Error *local_err = NULL;
281     uint8_t kvm_val =  kvmppc_get_cap_safe_bounds_check();
282 
283     if (tcg_enabled() && val) {
284         /* TCG only supports broken, allow other values and print a warning */
285         error_setg(&local_err,
286                    "TCG doesn't support requested feature, cap-sbbc=%s",
287                    cap_sbbc_possible.vals[val]);
288     } else if (kvm_enabled() && (val > kvm_val)) {
289         error_setg(errp,
290 "Requested safe bounds check capability level not supported by kvm,"
291                    " try appending -machine cap-sbbc=%s",
292                    cap_sbbc_possible.vals[kvm_val]);
293     }
294 
295     if (local_err != NULL)
296         warn_report_err(local_err);
297 }
298 
299 SpaprCapPossible cap_ibs_possible = {
300     .num = 5,
301     /* Note workaround only maintained for compatibility */
302     .vals = {"broken", "workaround", "fixed-ibs", "fixed-ccd", "fixed-na"},
303     .help = "broken - no protection, workaround - count cache flush"
304             ", fixed-ibs - indirect branch serialisation,"
305             " fixed-ccd - cache count disabled,"
306             " fixed-na - fixed in hardware (no longer applicable)",
307 };
308 
309 static void cap_safe_indirect_branch_apply(SpaprMachineState *spapr,
310                                            uint8_t val, Error **errp)
311 {
312     Error *local_err = NULL;
313     uint8_t kvm_val = kvmppc_get_cap_safe_indirect_branch();
314 
315     if (tcg_enabled() && val) {
316         /* TCG only supports broken, allow other values and print a warning */
317         error_setg(&local_err,
318                    "TCG doesn't support requested feature, cap-ibs=%s",
319                    cap_ibs_possible.vals[val]);
320     } else if (kvm_enabled() && (val > kvm_val)) {
321         error_setg(errp,
322 "Requested safe indirect branch capability level not supported by kvm,"
323                    " try appending -machine cap-ibs=%s",
324                    cap_ibs_possible.vals[kvm_val]);
325     }
326 
327     if (local_err != NULL) {
328         warn_report_err(local_err);
329     }
330 }
331 
332 #define VALUE_DESC_TRISTATE     " (broken, workaround, fixed)"
333 
334 void spapr_check_pagesize(SpaprMachineState *spapr, hwaddr pagesize,
335                           Error **errp)
336 {
337     hwaddr maxpagesize = (1ULL << spapr->eff.caps[SPAPR_CAP_HPT_MAXPAGESIZE]);
338 
339     if (!kvmppc_hpt_needs_host_contiguous_pages()) {
340         return;
341     }
342 
343     if (maxpagesize > pagesize) {
344         error_setg(errp,
345                    "Can't support %"HWADDR_PRIu" kiB guest pages with %"
346                    HWADDR_PRIu" kiB host pages with this KVM implementation",
347                    maxpagesize >> 10, pagesize >> 10);
348     }
349 }
350 
351 static void cap_hpt_maxpagesize_apply(SpaprMachineState *spapr,
352                                       uint8_t val, Error **errp)
353 {
354     if (val < 12) {
355         error_setg(errp, "Require at least 4kiB hpt-max-page-size");
356         return;
357     } else if (val < 16) {
358         warn_report("Many guests require at least 64kiB hpt-max-page-size");
359     }
360 
361     spapr_check_pagesize(spapr, qemu_minrampagesize(), errp);
362 }
363 
364 static bool cap_hpt_maxpagesize_migrate_needed(void *opaque)
365 {
366     return !SPAPR_MACHINE_GET_CLASS(opaque)->pre_4_1_migration;
367 }
368 
369 static bool spapr_pagesize_cb(void *opaque, uint32_t seg_pshift,
370                               uint32_t pshift)
371 {
372     unsigned maxshift = *((unsigned *)opaque);
373 
374     assert(pshift >= seg_pshift);
375 
376     /* Don't allow the guest to use pages bigger than the configured
377      * maximum size */
378     if (pshift > maxshift) {
379         return false;
380     }
381 
382     /* For whatever reason, KVM doesn't allow multiple pagesizes
383      * within a segment, *except* for the case of 16M pages in a 4k or
384      * 64k segment.  Always exclude other cases, so that TCG and KVM
385      * guests see a consistent environment */
386     if ((pshift != seg_pshift) && (pshift != 24)) {
387         return false;
388     }
389 
390     return true;
391 }
392 
393 static void cap_hpt_maxpagesize_cpu_apply(SpaprMachineState *spapr,
394                                           PowerPCCPU *cpu,
395                                           uint8_t val, Error **errp)
396 {
397     unsigned maxshift = val;
398 
399     ppc_hash64_filter_pagesizes(cpu, spapr_pagesize_cb, &maxshift);
400 }
401 
402 static void cap_nested_kvm_hv_apply(SpaprMachineState *spapr,
403                                     uint8_t val, Error **errp)
404 {
405     if (!val) {
406         /* capability disabled by default */
407         return;
408     }
409 
410     if (tcg_enabled()) {
411         error_setg(errp,
412                    "No Nested KVM-HV support in tcg,"
413                    " try appending -machine cap-nested-hv=off");
414     } else if (kvm_enabled()) {
415         if (!kvmppc_has_cap_nested_kvm_hv()) {
416             error_setg(errp,
417 "KVM implementation does not support Nested KVM-HV,"
418                        " try appending -machine cap-nested-hv=off");
419         } else if (kvmppc_set_cap_nested_kvm_hv(val) < 0) {
420                 error_setg(errp,
421 "Error enabling cap-nested-hv with KVM, try cap-nested-hv=off");
422         }
423     }
424 }
425 
426 static void cap_large_decr_apply(SpaprMachineState *spapr,
427                                  uint8_t val, Error **errp)
428 {
429     PowerPCCPU *cpu = POWERPC_CPU(first_cpu);
430     PowerPCCPUClass *pcc = POWERPC_CPU_GET_CLASS(cpu);
431 
432     if (!val) {
433         return; /* Disabled by default */
434     }
435 
436     if (tcg_enabled()) {
437         if (!ppc_check_compat(cpu, CPU_POWERPC_LOGICAL_3_00, 0,
438                               spapr->max_compat_pvr)) {
439             error_setg(errp,
440                 "Large decrementer only supported on POWER9, try -cpu POWER9");
441             return;
442         }
443     } else if (kvm_enabled()) {
444         int kvm_nr_bits = kvmppc_get_cap_large_decr();
445 
446         if (!kvm_nr_bits) {
447             error_setg(errp,
448                        "No large decrementer support,"
449                         " try appending -machine cap-large-decr=off");
450         } else if (pcc->lrg_decr_bits != kvm_nr_bits) {
451             error_setg(errp,
452 "KVM large decrementer size (%d) differs to model (%d),"
453                 " try appending -machine cap-large-decr=off",
454                 kvm_nr_bits, pcc->lrg_decr_bits);
455         }
456     }
457 }
458 
459 static void cap_large_decr_cpu_apply(SpaprMachineState *spapr,
460                                      PowerPCCPU *cpu,
461                                      uint8_t val, Error **errp)
462 {
463     CPUPPCState *env = &cpu->env;
464     target_ulong lpcr = env->spr[SPR_LPCR];
465 
466     if (kvm_enabled()) {
467         if (kvmppc_enable_cap_large_decr(cpu, val)) {
468             error_setg(errp,
469                        "No large decrementer support,"
470                        " try appending -machine cap-large-decr=off");
471         }
472     }
473 
474     if (val) {
475         lpcr |= LPCR_LD;
476     } else {
477         lpcr &= ~LPCR_LD;
478     }
479     ppc_store_lpcr(cpu, lpcr);
480 }
481 
482 static void cap_ccf_assist_apply(SpaprMachineState *spapr, uint8_t val,
483                                  Error **errp)
484 {
485     uint8_t kvm_val = kvmppc_get_cap_count_cache_flush_assist();
486 
487     if (tcg_enabled() && val) {
488         /* TCG doesn't implement anything here, but allow with a warning */
489         warn_report("TCG doesn't support requested feature, cap-ccf-assist=on");
490     } else if (kvm_enabled() && (val > kvm_val)) {
491         uint8_t kvm_ibs = kvmppc_get_cap_safe_indirect_branch();
492 
493         if (kvm_ibs == SPAPR_CAP_FIXED_CCD) {
494             /*
495              * If we don't have CCF assist on the host, the assist
496              * instruction is a harmless no-op.  It won't correctly
497              * implement the cache count flush *but* if we have
498              * count-cache-disabled in the host, that flush is
499              * unnnecessary.  So, specifically allow this case.  This
500              * allows us to have better performance on POWER9 DD2.3,
501              * while still working on POWER9 DD2.2 and POWER8 host
502              * cpus.
503              */
504             return;
505         }
506         error_setg(errp,
507 "Requested count cache flush assist capability level not supported by kvm,"
508                    " try appending -machine cap-ccf-assist=off");
509     }
510 }
511 
512 static void cap_fwnmi_mce_apply(SpaprMachineState *spapr, uint8_t val,
513                                 Error **errp)
514 {
515     if (!val) {
516         return; /* Disabled by default */
517     }
518 
519     if (tcg_enabled()) {
520         warn_report("Firmware Assisted Non-Maskable Interrupts(FWNMI) not "
521                     "supported in TCG");
522     } else if (kvm_enabled()) {
523         if (kvmppc_set_fwnmi() < 0) {
524             error_setg(errp, "Firmware Assisted Non-Maskable Interrupts(FWNMI) "
525                              "not supported by KVM");
526         }
527     }
528 }
529 
530 SpaprCapabilityInfo capability_table[SPAPR_CAP_NUM] = {
531     [SPAPR_CAP_HTM] = {
532         .name = "htm",
533         .description = "Allow Hardware Transactional Memory (HTM)",
534         .index = SPAPR_CAP_HTM,
535         .get = spapr_cap_get_bool,
536         .set = spapr_cap_set_bool,
537         .type = "bool",
538         .apply = cap_htm_apply,
539     },
540     [SPAPR_CAP_VSX] = {
541         .name = "vsx",
542         .description = "Allow Vector Scalar Extensions (VSX)",
543         .index = SPAPR_CAP_VSX,
544         .get = spapr_cap_get_bool,
545         .set = spapr_cap_set_bool,
546         .type = "bool",
547         .apply = cap_vsx_apply,
548     },
549     [SPAPR_CAP_DFP] = {
550         .name = "dfp",
551         .description = "Allow Decimal Floating Point (DFP)",
552         .index = SPAPR_CAP_DFP,
553         .get = spapr_cap_get_bool,
554         .set = spapr_cap_set_bool,
555         .type = "bool",
556         .apply = cap_dfp_apply,
557     },
558     [SPAPR_CAP_CFPC] = {
559         .name = "cfpc",
560         .description = "Cache Flush on Privilege Change" VALUE_DESC_TRISTATE,
561         .index = SPAPR_CAP_CFPC,
562         .get = spapr_cap_get_string,
563         .set = spapr_cap_set_string,
564         .type = "string",
565         .possible = &cap_cfpc_possible,
566         .apply = cap_safe_cache_apply,
567     },
568     [SPAPR_CAP_SBBC] = {
569         .name = "sbbc",
570         .description = "Speculation Barrier Bounds Checking" VALUE_DESC_TRISTATE,
571         .index = SPAPR_CAP_SBBC,
572         .get = spapr_cap_get_string,
573         .set = spapr_cap_set_string,
574         .type = "string",
575         .possible = &cap_sbbc_possible,
576         .apply = cap_safe_bounds_check_apply,
577     },
578     [SPAPR_CAP_IBS] = {
579         .name = "ibs",
580         .description =
581             "Indirect Branch Speculation (broken, workaround, fixed-ibs,"
582             "fixed-ccd, fixed-na)",
583         .index = SPAPR_CAP_IBS,
584         .get = spapr_cap_get_string,
585         .set = spapr_cap_set_string,
586         .type = "string",
587         .possible = &cap_ibs_possible,
588         .apply = cap_safe_indirect_branch_apply,
589     },
590     [SPAPR_CAP_HPT_MAXPAGESIZE] = {
591         .name = "hpt-max-page-size",
592         .description = "Maximum page size for Hash Page Table guests",
593         .index = SPAPR_CAP_HPT_MAXPAGESIZE,
594         .get = spapr_cap_get_pagesize,
595         .set = spapr_cap_set_pagesize,
596         .type = "int",
597         .apply = cap_hpt_maxpagesize_apply,
598         .cpu_apply = cap_hpt_maxpagesize_cpu_apply,
599         .migrate_needed = cap_hpt_maxpagesize_migrate_needed,
600     },
601     [SPAPR_CAP_NESTED_KVM_HV] = {
602         .name = "nested-hv",
603         .description = "Allow Nested KVM-HV",
604         .index = SPAPR_CAP_NESTED_KVM_HV,
605         .get = spapr_cap_get_bool,
606         .set = spapr_cap_set_bool,
607         .type = "bool",
608         .apply = cap_nested_kvm_hv_apply,
609     },
610     [SPAPR_CAP_LARGE_DECREMENTER] = {
611         .name = "large-decr",
612         .description = "Allow Large Decrementer",
613         .index = SPAPR_CAP_LARGE_DECREMENTER,
614         .get = spapr_cap_get_bool,
615         .set = spapr_cap_set_bool,
616         .type = "bool",
617         .apply = cap_large_decr_apply,
618         .cpu_apply = cap_large_decr_cpu_apply,
619     },
620     [SPAPR_CAP_CCF_ASSIST] = {
621         .name = "ccf-assist",
622         .description = "Count Cache Flush Assist via HW Instruction",
623         .index = SPAPR_CAP_CCF_ASSIST,
624         .get = spapr_cap_get_bool,
625         .set = spapr_cap_set_bool,
626         .type = "bool",
627         .apply = cap_ccf_assist_apply,
628     },
629     [SPAPR_CAP_FWNMI_MCE] = {
630         .name = "fwnmi-mce",
631         .description = "Handle fwnmi machine check exceptions",
632         .index = SPAPR_CAP_FWNMI_MCE,
633         .get = spapr_cap_get_bool,
634         .set = spapr_cap_set_bool,
635         .type = "bool",
636         .apply = cap_fwnmi_mce_apply,
637     },
638 };
639 
640 static SpaprCapabilities default_caps_with_cpu(SpaprMachineState *spapr,
641                                                const char *cputype)
642 {
643     SpaprMachineClass *smc = SPAPR_MACHINE_GET_CLASS(spapr);
644     SpaprCapabilities caps;
645 
646     caps = smc->default_caps;
647 
648     if (!ppc_type_check_compat(cputype, CPU_POWERPC_LOGICAL_3_00,
649                                0, spapr->max_compat_pvr)) {
650         caps.caps[SPAPR_CAP_LARGE_DECREMENTER] = SPAPR_CAP_OFF;
651     }
652 
653     if (!ppc_type_check_compat(cputype, CPU_POWERPC_LOGICAL_2_07,
654                                0, spapr->max_compat_pvr)) {
655         caps.caps[SPAPR_CAP_HTM] = SPAPR_CAP_OFF;
656         caps.caps[SPAPR_CAP_CFPC] = SPAPR_CAP_BROKEN;
657     }
658 
659     if (!ppc_type_check_compat(cputype, CPU_POWERPC_LOGICAL_2_06_PLUS,
660                                0, spapr->max_compat_pvr)) {
661         caps.caps[SPAPR_CAP_SBBC] = SPAPR_CAP_BROKEN;
662     }
663 
664     if (!ppc_type_check_compat(cputype, CPU_POWERPC_LOGICAL_2_06,
665                                0, spapr->max_compat_pvr)) {
666         caps.caps[SPAPR_CAP_VSX] = SPAPR_CAP_OFF;
667         caps.caps[SPAPR_CAP_DFP] = SPAPR_CAP_OFF;
668         caps.caps[SPAPR_CAP_IBS] = SPAPR_CAP_BROKEN;
669     }
670 
671     /* This is for pseries-2.12 and older */
672     if (smc->default_caps.caps[SPAPR_CAP_HPT_MAXPAGESIZE] == 0) {
673         uint8_t mps;
674 
675         if (kvmppc_hpt_needs_host_contiguous_pages()) {
676             mps = ctz64(qemu_minrampagesize());
677         } else {
678             mps = 34; /* allow everything up to 16GiB, i.e. everything */
679         }
680 
681         caps.caps[SPAPR_CAP_HPT_MAXPAGESIZE] = mps;
682     }
683 
684     return caps;
685 }
686 
687 int spapr_caps_pre_load(void *opaque)
688 {
689     SpaprMachineState *spapr = opaque;
690 
691     /* Set to default so we can tell if this came in with the migration */
692     spapr->mig = spapr->def;
693     return 0;
694 }
695 
696 int spapr_caps_pre_save(void *opaque)
697 {
698     SpaprMachineState *spapr = opaque;
699 
700     spapr->mig = spapr->eff;
701     return 0;
702 }
703 
704 /* This has to be called from the top-level spapr post_load, not the
705  * caps specific one.  Otherwise it wouldn't be called when the source
706  * caps are all defaults, which could still conflict with overridden
707  * caps on the destination */
708 int spapr_caps_post_migration(SpaprMachineState *spapr)
709 {
710     int i;
711     bool ok = true;
712     SpaprCapabilities dstcaps = spapr->eff;
713     SpaprCapabilities srccaps;
714 
715     srccaps = default_caps_with_cpu(spapr, MACHINE(spapr)->cpu_type);
716     for (i = 0; i < SPAPR_CAP_NUM; i++) {
717         /* If not default value then assume came in with the migration */
718         if (spapr->mig.caps[i] != spapr->def.caps[i]) {
719             srccaps.caps[i] = spapr->mig.caps[i];
720         }
721     }
722 
723     for (i = 0; i < SPAPR_CAP_NUM; i++) {
724         SpaprCapabilityInfo *info = &capability_table[i];
725 
726         if (srccaps.caps[i] > dstcaps.caps[i]) {
727             error_report("cap-%s higher level (%d) in incoming stream than on destination (%d)",
728                          info->name, srccaps.caps[i], dstcaps.caps[i]);
729             ok = false;
730         }
731 
732         if (srccaps.caps[i] < dstcaps.caps[i]) {
733             warn_report("cap-%s lower level (%d) in incoming stream than on destination (%d)",
734                          info->name, srccaps.caps[i], dstcaps.caps[i]);
735         }
736     }
737 
738     return ok ? 0 : -EINVAL;
739 }
740 
741 /* Used to generate the migration field and needed function for a spapr cap */
742 #define SPAPR_CAP_MIG_STATE(sname, cap)                 \
743 static bool spapr_cap_##sname##_needed(void *opaque)    \
744 {                                                       \
745     SpaprMachineState *spapr = opaque;                  \
746     bool (*needed)(void *opaque) =                      \
747         capability_table[cap].migrate_needed;           \
748                                                         \
749     return needed ? needed(opaque) : true &&            \
750            spapr->cmd_line_caps[cap] &&                 \
751            (spapr->eff.caps[cap] !=                     \
752             spapr->def.caps[cap]);                      \
753 }                                                       \
754                                                         \
755 const VMStateDescription vmstate_spapr_cap_##sname = {  \
756     .name = "spapr/cap/" #sname,                        \
757     .version_id = 1,                                    \
758     .minimum_version_id = 1,                            \
759     .needed = spapr_cap_##sname##_needed,               \
760     .fields = (VMStateField[]) {                        \
761         VMSTATE_UINT8(mig.caps[cap],                    \
762                       SpaprMachineState),               \
763         VMSTATE_END_OF_LIST()                           \
764     },                                                  \
765 }
766 
767 SPAPR_CAP_MIG_STATE(htm, SPAPR_CAP_HTM);
768 SPAPR_CAP_MIG_STATE(vsx, SPAPR_CAP_VSX);
769 SPAPR_CAP_MIG_STATE(dfp, SPAPR_CAP_DFP);
770 SPAPR_CAP_MIG_STATE(cfpc, SPAPR_CAP_CFPC);
771 SPAPR_CAP_MIG_STATE(sbbc, SPAPR_CAP_SBBC);
772 SPAPR_CAP_MIG_STATE(ibs, SPAPR_CAP_IBS);
773 SPAPR_CAP_MIG_STATE(hpt_maxpagesize, SPAPR_CAP_HPT_MAXPAGESIZE);
774 SPAPR_CAP_MIG_STATE(nested_kvm_hv, SPAPR_CAP_NESTED_KVM_HV);
775 SPAPR_CAP_MIG_STATE(large_decr, SPAPR_CAP_LARGE_DECREMENTER);
776 SPAPR_CAP_MIG_STATE(ccf_assist, SPAPR_CAP_CCF_ASSIST);
777 SPAPR_CAP_MIG_STATE(fwnmi, SPAPR_CAP_FWNMI_MCE);
778 
779 void spapr_caps_init(SpaprMachineState *spapr)
780 {
781     SpaprCapabilities default_caps;
782     int i;
783 
784     /* Compute the actual set of caps we should run with */
785     default_caps = default_caps_with_cpu(spapr, MACHINE(spapr)->cpu_type);
786 
787     for (i = 0; i < SPAPR_CAP_NUM; i++) {
788         /* Store the defaults */
789         spapr->def.caps[i] = default_caps.caps[i];
790         /* If not set on the command line then apply the default value */
791         if (!spapr->cmd_line_caps[i]) {
792             spapr->eff.caps[i] = default_caps.caps[i];
793         }
794     }
795 }
796 
797 void spapr_caps_apply(SpaprMachineState *spapr)
798 {
799     int i;
800 
801     for (i = 0; i < SPAPR_CAP_NUM; i++) {
802         SpaprCapabilityInfo *info = &capability_table[i];
803 
804         /*
805          * If the apply function can't set the desired level and thinks it's
806          * fatal, it should cause that.
807          */
808         info->apply(spapr, spapr->eff.caps[i], &error_fatal);
809     }
810 }
811 
812 void spapr_caps_cpu_apply(SpaprMachineState *spapr, PowerPCCPU *cpu)
813 {
814     int i;
815 
816     for (i = 0; i < SPAPR_CAP_NUM; i++) {
817         SpaprCapabilityInfo *info = &capability_table[i];
818 
819         /*
820          * If the apply function can't set the desired level and thinks it's
821          * fatal, it should cause that.
822          */
823         if (info->cpu_apply) {
824             info->cpu_apply(spapr, cpu, spapr->eff.caps[i], &error_fatal);
825         }
826     }
827 }
828 
829 void spapr_caps_add_properties(SpaprMachineClass *smc, Error **errp)
830 {
831     Error *local_err = NULL;
832     ObjectClass *klass = OBJECT_CLASS(smc);
833     int i;
834 
835     for (i = 0; i < ARRAY_SIZE(capability_table); i++) {
836         SpaprCapabilityInfo *cap = &capability_table[i];
837         char *name = g_strdup_printf("cap-%s", cap->name);
838         char *desc;
839 
840         object_class_property_add(klass, name, cap->type,
841                                   cap->get, cap->set,
842                                   NULL, cap, &local_err);
843         if (local_err) {
844             error_propagate(errp, local_err);
845             g_free(name);
846             return;
847         }
848 
849         desc = g_strdup_printf("%s", cap->description);
850         object_class_property_set_description(klass, name, desc, &local_err);
851         g_free(name);
852         g_free(desc);
853         if (local_err) {
854             error_propagate(errp, local_err);
855             return;
856         }
857     }
858 }
859