2 * Arm CPU feature test cases
4 * Copyright (c) 2019 Red Hat Inc.
6 * Andrew Jones <drjones@redhat.com>
8 * This work is licensed under the terms of the GNU GPL, version 2 or later.
9 * See the COPYING file in the top-level directory.
11 #include "qemu/osdep.h"
12 #include "qemu/bitops.h"
14 #include "qapi/qmp/qdict.h"
15 #include "qapi/qmp/qjson.h"
18 * We expect the SVE max-vq to be 16. Also it must be <= 64
19 * for our test code, otherwise 'vls' can't just be a uint64_t.
23 #define MACHINE "-machine virt,gic-version=max -accel tcg "
24 #define MACHINE_KVM "-machine virt,gic-version=max -accel kvm "
25 #define QUERY_HEAD "{ 'execute': 'query-cpu-model-expansion', " \
26 " 'arguments': { 'type': 'full', "
27 #define QUERY_TAIL "}}"
29 static QDict
*do_query_no_props(QTestState
*qts
, const char *cpu_type
)
31 return qtest_qmp(qts
, QUERY_HEAD
"'model': { 'name': %s }"
32 QUERY_TAIL
, cpu_type
);
36 static QDict
*do_query(QTestState
*qts
, const char *cpu_type
,
46 args
= qdict_from_vjsonf_nofail(fmt
, ap
);
49 resp
= qtest_qmp(qts
, QUERY_HEAD
"'model': { 'name': %s, "
51 QUERY_TAIL
, cpu_type
, args
);
53 resp
= do_query_no_props(qts
, cpu_type
);
59 static const char *resp_get_error(QDict
*resp
)
65 qdict
= qdict_get_qdict(resp
, "error");
67 return qdict_get_str(qdict
, "desc");
73 #define assert_error(qts, cpu_type, expected_error, fmt, ...) \
78 _resp = do_query(qts, cpu_type, fmt, ##__VA_ARGS__); \
80 _error = resp_get_error(_resp); \
82 g_assert_cmpstr(_error, ==, expected_error); \
83 qobject_unref(_resp); \
86 static bool resp_has_props(QDict
*resp
)
92 if (!qdict_haskey(resp
, "return")) {
95 qdict
= qdict_get_qdict(resp
, "return");
97 if (!qdict_haskey(qdict
, "model")) {
100 qdict
= qdict_get_qdict(qdict
, "model");
102 return qdict_haskey(qdict
, "props");
105 static QDict
*resp_get_props(QDict
*resp
)
110 g_assert(resp_has_props(resp
));
112 qdict
= qdict_get_qdict(resp
, "return");
113 qdict
= qdict_get_qdict(qdict
, "model");
114 qdict
= qdict_get_qdict(qdict
, "props");
119 static bool resp_get_feature(QDict
*resp
, const char *feature
)
124 g_assert(resp_has_props(resp
));
125 props
= resp_get_props(resp
);
126 g_assert(qdict_get(props
, feature
));
127 return qdict_get_bool(props
, feature
);
130 #define assert_has_feature(qts, cpu_type, feature) \
132 QDict *_resp = do_query_no_props(qts, cpu_type); \
134 g_assert(resp_has_props(_resp)); \
135 g_assert(qdict_get(resp_get_props(_resp), feature)); \
136 qobject_unref(_resp); \
139 #define assert_has_not_feature(qts, cpu_type, feature) \
141 QDict *_resp = do_query_no_props(qts, cpu_type); \
143 g_assert(!resp_has_props(_resp) || \
144 !qdict_get(resp_get_props(_resp), feature)); \
145 qobject_unref(_resp); \
148 #define resp_assert_feature(resp, feature, expected_value) \
153 g_assert(resp_has_props(_resp)); \
154 _props = resp_get_props(_resp); \
155 g_assert(qdict_get(_props, feature)); \
156 g_assert(qdict_get_bool(_props, feature) == (expected_value)); \
159 #define assert_feature(qts, cpu_type, feature, expected_value) \
163 _resp = do_query_no_props(qts, cpu_type); \
165 resp_assert_feature(_resp, feature, expected_value); \
166 qobject_unref(_resp); \
169 #define assert_set_feature(qts, cpu_type, feature, value) \
171 const char *_fmt = (value) ? "{ %s: true }" : "{ %s: false }"; \
174 _resp = do_query(qts, cpu_type, _fmt, feature); \
176 resp_assert_feature(_resp, feature, value); \
177 qobject_unref(_resp); \
180 #define assert_has_feature_enabled(qts, cpu_type, feature) \
181 assert_feature(qts, cpu_type, feature, true)
183 #define assert_has_feature_disabled(qts, cpu_type, feature) \
184 assert_feature(qts, cpu_type, feature, false)
186 static void assert_type_full(QTestState
*qts
)
191 resp
= qtest_qmp(qts
, "{ 'execute': 'query-cpu-model-expansion', "
192 "'arguments': { 'type': 'static', "
193 "'model': { 'name': 'foo' }}}");
195 error
= resp_get_error(resp
);
197 g_assert_cmpstr(error
, ==,
198 "The requested expansion type is not supported");
202 static void assert_bad_props(QTestState
*qts
, const char *cpu_type
)
207 resp
= qtest_qmp(qts
, "{ 'execute': 'query-cpu-model-expansion', "
208 "'arguments': { 'type': 'full', "
209 "'model': { 'name': %s, "
210 "'props': false }}}",
213 error
= resp_get_error(resp
);
215 g_assert_cmpstr(error
, ==,
216 "Invalid parameter type for 'model.props',"
217 " expected: object");
221 static uint64_t resp_get_sve_vls(QDict
*resp
)
229 g_assert(resp_has_props(resp
));
231 props
= resp_get_props(resp
);
233 for (e
= qdict_first(props
); e
; e
= qdict_next(props
, e
)) {
234 if (strlen(e
->key
) > 3 && !strncmp(e
->key
, "sve", 3) &&
235 g_ascii_isdigit(e
->key
[3])) {
239 bits
= g_ascii_strtoll(&e
->key
[3], &endptr
, 10);
240 if (!bits
|| *endptr
!= '\0') {
244 if (qdict_get_bool(props
, e
->key
)) {
245 vls
|= BIT_ULL((bits
/ 128) - 1);
251 g_assert(n
== SVE_MAX_VQ
);
256 #define assert_sve_vls(qts, cpu_type, expected_vls, fmt, ...) \
258 QDict *_resp = do_query(qts, cpu_type, fmt, ##__VA_ARGS__); \
260 g_assert(resp_has_props(_resp)); \
261 g_assert(resp_get_sve_vls(_resp) == expected_vls); \
262 qobject_unref(_resp); \
265 static void sve_tests_default(QTestState
*qts
, const char *cpu_type
)
268 * With no sve-max-vq or sve<N> properties on the command line
269 * the default is to have all vector lengths enabled. This also
270 * tests that 'sve' is 'on' by default.
272 assert_sve_vls(qts
, cpu_type
, BIT_ULL(SVE_MAX_VQ
) - 1, NULL
);
274 /* With SVE off, all vector lengths should also be off. */
275 assert_sve_vls(qts
, cpu_type
, 0, "{ 'sve': false }");
277 /* With SVE on, we must have at least one vector length enabled. */
278 assert_error(qts
, cpu_type
, "cannot disable sve128", "{ 'sve128': false }");
280 /* Basic enable/disable tests. */
281 assert_sve_vls(qts
, cpu_type
, 0x7, "{ 'sve384': true }");
282 assert_sve_vls(qts
, cpu_type
, ((BIT_ULL(SVE_MAX_VQ
) - 1) & ~BIT_ULL(2)),
283 "{ 'sve384': false }");
286 * ---------------------------------------------------------------------
287 * power-of-two(vq) all-power- can can
288 * of-two(< vq) enable disable
289 * ---------------------------------------------------------------------
290 * vq < max_vq no MUST* yes yes
291 * vq < max_vq yes MUST* yes no
292 * ---------------------------------------------------------------------
293 * vq == max_vq n/a MUST* yes** yes**
294 * ---------------------------------------------------------------------
295 * vq > max_vq n/a no no yes
296 * vq > max_vq n/a yes yes yes
297 * ---------------------------------------------------------------------
299 * [*] "MUST" means this requirement must already be satisfied,
300 * otherwise 'max_vq' couldn't itself be enabled.
302 * [**] Not testable with the QMP interface, only with the command line.
306 assert_sve_vls(qts
, cpu_type
, 0x8b, "{ 'sve1024': true }");
308 /* max_vq := 8, vq < max_vq, !power-of-two(vq) */
309 assert_sve_vls(qts
, cpu_type
, 0x8f,
310 "{ 'sve1024': true, 'sve384': true }");
311 assert_sve_vls(qts
, cpu_type
, 0x8b,
312 "{ 'sve1024': true, 'sve384': false }");
314 /* max_vq := 8, vq < max_vq, power-of-two(vq) */
315 assert_sve_vls(qts
, cpu_type
, 0x8b,
316 "{ 'sve1024': true, 'sve256': true }");
317 assert_error(qts
, cpu_type
, "cannot disable sve256",
318 "{ 'sve1024': true, 'sve256': false }");
320 /* max_vq := 3, vq > max_vq, !all-power-of-two(< vq) */
321 assert_error(qts
, cpu_type
, "cannot disable sve512",
322 "{ 'sve384': true, 'sve512': false, 'sve640': true }");
325 * We can disable power-of-two vector lengths when all larger lengths
326 * are also disabled. We only need to disable the power-of-two length,
327 * as all non-enabled larger lengths will then be auto-disabled.
329 assert_sve_vls(qts
, cpu_type
, 0x7, "{ 'sve512': false }");
331 /* max_vq := 3, vq > max_vq, all-power-of-two(< vq) */
332 assert_sve_vls(qts
, cpu_type
, 0x1f,
333 "{ 'sve384': true, 'sve512': true, 'sve640': true }");
334 assert_sve_vls(qts
, cpu_type
, 0xf,
335 "{ 'sve384': true, 'sve512': true, 'sve640': false }");
338 static void sve_tests_sve_max_vq_8(const void *data
)
342 qts
= qtest_init(MACHINE
"-cpu max,sve-max-vq=8");
344 assert_sve_vls(qts
, "max", BIT_ULL(8) - 1, NULL
);
347 * Disabling the max-vq set by sve-max-vq is not allowed, but
348 * of course enabling it is OK.
350 assert_error(qts
, "max", "cannot disable sve1024", "{ 'sve1024': false }");
351 assert_sve_vls(qts
, "max", 0xff, "{ 'sve1024': true }");
354 * Enabling anything larger than max-vq set by sve-max-vq is not
355 * allowed, but of course disabling everything larger is OK.
357 assert_error(qts
, "max", "cannot enable sve1152", "{ 'sve1152': true }");
358 assert_sve_vls(qts
, "max", 0xff, "{ 'sve1152': false }");
361 * We can enable/disable non power-of-two lengths smaller than the
362 * max-vq set by sve-max-vq, but, while we can enable power-of-two
363 * lengths, we can't disable them.
365 assert_sve_vls(qts
, "max", 0xff, "{ 'sve384': true }");
366 assert_sve_vls(qts
, "max", 0xfb, "{ 'sve384': false }");
367 assert_sve_vls(qts
, "max", 0xff, "{ 'sve256': true }");
368 assert_error(qts
, "max", "cannot disable sve256", "{ 'sve256': false }");
373 static void sve_tests_sve_off(const void *data
)
377 qts
= qtest_init(MACHINE
"-cpu max,sve=off");
379 /* SVE is off, so the map should be empty. */
380 assert_sve_vls(qts
, "max", 0, NULL
);
382 /* The map stays empty even if we turn lengths off. */
383 assert_sve_vls(qts
, "max", 0, "{ 'sve128': false }");
385 /* It's an error to enable lengths when SVE is off. */
386 assert_error(qts
, "max", "cannot enable sve128", "{ 'sve128': true }");
388 /* With SVE re-enabled we should get all vector lengths enabled. */
389 assert_sve_vls(qts
, "max", BIT_ULL(SVE_MAX_VQ
) - 1, "{ 'sve': true }");
391 /* Or enable SVE with just specific vector lengths. */
392 assert_sve_vls(qts
, "max", 0x3,
393 "{ 'sve': true, 'sve128': true, 'sve256': true }");
398 static void sve_tests_sve_off_kvm(const void *data
)
402 qts
= qtest_init(MACHINE_KVM
"-cpu max,sve=off");
405 * We don't know if this host supports SVE so we don't
406 * attempt to test enabling anything. We only test that
407 * everything is disabled (as it should be with sve=off)
408 * and that using sve<N>=off to explicitly disable vector
411 assert_sve_vls(qts
, "max", 0, NULL
);
412 assert_sve_vls(qts
, "max", 0, "{ 'sve128': false }");
417 static void pauth_tests_default(QTestState
*qts
, const char *cpu_type
)
419 assert_has_feature_enabled(qts
, cpu_type
, "pauth");
420 assert_has_feature_disabled(qts
, cpu_type
, "pauth-impdef");
421 assert_has_feature_disabled(qts
, cpu_type
, "pauth-qarma3");
422 assert_set_feature(qts
, cpu_type
, "pauth", false);
423 assert_set_feature(qts
, cpu_type
, "pauth", true);
424 assert_set_feature(qts
, cpu_type
, "pauth-impdef", true);
425 assert_set_feature(qts
, cpu_type
, "pauth-impdef", false);
426 assert_set_feature(qts
, cpu_type
, "pauth-qarma3", true);
427 assert_set_feature(qts
, cpu_type
, "pauth-qarma3", false);
428 assert_error(qts
, cpu_type
,
429 "cannot enable pauth-impdef or pauth-qarma3 without pauth",
430 "{ 'pauth': false, 'pauth-impdef': true }");
431 assert_error(qts
, cpu_type
,
432 "cannot enable pauth-impdef or pauth-qarma3 without pauth",
433 "{ 'pauth': false, 'pauth-qarma3': true }");
434 assert_error(qts
, cpu_type
,
435 "cannot enable both pauth-impdef and pauth-qarma3",
436 "{ 'pauth': true, 'pauth-impdef': true, 'pauth-qarma3': true }");
439 static void test_query_cpu_model_expansion(const void *data
)
443 qts
= qtest_init(MACHINE
"-cpu max");
445 /* Test common query-cpu-model-expansion input validation */
446 assert_type_full(qts
);
447 assert_bad_props(qts
, "max");
448 assert_error(qts
, "foo", "The CPU type 'foo' is not a recognized "
449 "ARM CPU type", NULL
);
450 assert_error(qts
, "max", "Parameter 'model.props.not-a-prop' is unexpected",
451 "{ 'not-a-prop': false }");
452 assert_error(qts
, "host", "The CPU type 'host' requires KVM", NULL
);
454 /* Test expected feature presence/absence for some cpu types */
455 assert_has_feature_enabled(qts
, "cortex-a15", "pmu");
456 assert_has_not_feature(qts
, "cortex-a15", "aarch64");
458 /* Enabling and disabling pmu should always work. */
459 assert_has_feature_enabled(qts
, "max", "pmu");
460 assert_set_feature(qts
, "max", "pmu", false);
461 assert_set_feature(qts
, "max", "pmu", true);
463 assert_has_not_feature(qts
, "max", "kvm-no-adjvtime");
464 assert_has_not_feature(qts
, "max", "kvm-steal-time");
466 if (g_str_equal(qtest_get_arch(), "aarch64")) {
467 assert_has_feature_enabled(qts
, "max", "aarch64");
468 assert_has_feature_enabled(qts
, "max", "sve");
469 assert_has_feature_enabled(qts
, "max", "sve128");
470 assert_has_feature_enabled(qts
, "cortex-a57", "pmu");
471 assert_has_feature_enabled(qts
, "cortex-a57", "aarch64");
473 assert_has_feature_enabled(qts
, "a64fx", "pmu");
474 assert_has_feature_enabled(qts
, "a64fx", "aarch64");
476 * A64FX does not support any other vector lengths besides those
477 * that are enabled by default(128bit, 256bits, 512bit).
479 assert_has_feature_enabled(qts
, "a64fx", "sve");
480 assert_sve_vls(qts
, "a64fx", 0xb, NULL
);
481 assert_error(qts
, "a64fx", "cannot enable sve384",
482 "{ 'sve384': true }");
483 assert_error(qts
, "a64fx", "cannot enable sve640",
484 "{ 'sve640': true }");
486 sve_tests_default(qts
, "max");
487 pauth_tests_default(qts
, "max");
489 /* Test that features that depend on KVM generate errors without. */
490 assert_error(qts
, "max",
491 "'aarch64' feature cannot be disabled "
492 "unless KVM is enabled and 32-bit EL1 "
494 "{ 'aarch64': false }");
500 static void test_query_cpu_model_expansion_kvm(const void *data
)
504 qts
= qtest_init(MACHINE_KVM
"-cpu max");
506 /* Enabling and disabling kvm-no-adjvtime should always work. */
507 assert_has_feature_disabled(qts
, "host", "kvm-no-adjvtime");
508 assert_set_feature(qts
, "host", "kvm-no-adjvtime", true);
509 assert_set_feature(qts
, "host", "kvm-no-adjvtime", false);
511 if (g_str_equal(qtest_get_arch(), "aarch64")) {
512 bool kvm_supports_steal_time
;
513 bool kvm_supports_sve
;
514 char max_name
[8], name
[8];
521 * When using KVM, only the 'host' and 'max' CPU models are
522 * supported. Test that we're emitting a suitable error for
523 * unsupported CPU models.
525 if (qtest_has_accel("tcg")) {
526 assert_error(qts
, "cortex-a7",
527 "We cannot guarantee the CPU type 'cortex-a7' works "
528 "with KVM on this host", NULL
);
531 * With a KVM-only build the 32-bit CPUs are not present.
533 assert_error(qts
, "cortex-a7",
534 "The CPU type 'cortex-a7' is not a "
535 "recognized ARM CPU type", NULL
);
538 assert_has_feature_enabled(qts
, "host", "aarch64");
540 /* Enabling and disabling pmu should always work. */
541 assert_has_feature_enabled(qts
, "host", "pmu");
542 assert_set_feature(qts
, "host", "pmu", false);
543 assert_set_feature(qts
, "host", "pmu", true);
546 * Some features would be enabled by default, but they're disabled
547 * because this instance of KVM doesn't support them. Test that the
548 * features are present, and, when enabled, issue further tests.
550 assert_has_feature(qts
, "host", "kvm-steal-time");
551 assert_has_feature(qts
, "host", "sve");
553 resp
= do_query_no_props(qts
, "host");
554 kvm_supports_steal_time
= resp_get_feature(resp
, "kvm-steal-time");
555 kvm_supports_sve
= resp_get_feature(resp
, "sve");
556 vls
= resp_get_sve_vls(resp
);
559 if (kvm_supports_steal_time
) {
560 /* If we have steal-time then we should be able to toggle it. */
561 assert_set_feature(qts
, "host", "kvm-steal-time", false);
562 assert_set_feature(qts
, "host", "kvm-steal-time", true);
565 if (kvm_supports_sve
) {
567 max_vq
= 64 - __builtin_clzll(vls
);
568 sprintf(max_name
, "sve%u", max_vq
* 128);
570 /* Enabling a supported length is of course fine. */
571 assert_sve_vls(qts
, "host", vls
, "{ %s: true }", max_name
);
573 /* Get the next supported length smaller than max-vq. */
574 vq
= 64 - __builtin_clzll(vls
& ~BIT_ULL(max_vq
- 1));
577 * We have at least one length smaller than max-vq,
578 * so we can disable max-vq.
580 assert_sve_vls(qts
, "host", (vls
& ~BIT_ULL(max_vq
- 1)),
581 "{ %s: false }", max_name
);
584 * Smaller, supported vector lengths cannot be disabled
585 * unless all larger, supported vector lengths are also
588 sprintf(name
, "sve%u", vq
* 128);
589 error
= g_strdup_printf("cannot disable %s", name
);
590 assert_error(qts
, "host", error
,
591 "{ %s: true, %s: false }",
597 * The smallest, supported vector length is required, because
598 * we need at least one vector length enabled.
600 vq
= __builtin_ffsll(vls
);
601 sprintf(name
, "sve%u", vq
* 128);
602 error
= g_strdup_printf("cannot disable %s", name
);
603 assert_error(qts
, "host", error
, "{ %s: false }", name
);
606 /* Get an unsupported length. */
607 for (vq
= 1; vq
<= max_vq
; ++vq
) {
608 if (!(vls
& BIT_ULL(vq
- 1))) {
612 if (vq
<= SVE_MAX_VQ
) {
613 sprintf(name
, "sve%u", vq
* 128);
614 error
= g_strdup_printf("cannot enable %s", name
);
615 assert_error(qts
, "host", error
, "{ %s: true }", name
);
622 assert_has_not_feature(qts
, "host", "aarch64");
623 assert_has_not_feature(qts
, "host", "pmu");
624 assert_has_not_feature(qts
, "host", "sve");
625 assert_has_not_feature(qts
, "host", "kvm-steal-time");
631 int main(int argc
, char **argv
)
633 g_test_init(&argc
, &argv
, NULL
);
635 if (!qtest_has_machine("virt")) {
639 if (qtest_has_accel("tcg")) {
640 qtest_add_data_func("/arm/query-cpu-model-expansion",
641 NULL
, test_query_cpu_model_expansion
);
644 if (!g_str_equal(qtest_get_arch(), "aarch64")) {
649 * For now we only run KVM specific tests with AArch64 QEMU in
650 * order avoid attempting to run an AArch32 QEMU with KVM on
651 * AArch64 hosts. That won't work and isn't easy to detect.
653 if (qtest_has_accel("kvm")) {
655 * This tests target the 'host' CPU type, so register it only if
658 qtest_add_data_func("/arm/kvm/query-cpu-model-expansion",
659 NULL
, test_query_cpu_model_expansion_kvm
);
661 qtest_add_data_func("/arm/kvm/query-cpu-model-expansion/sve-off",
662 NULL
, sve_tests_sve_off_kvm
);
665 if (qtest_has_accel("tcg")) {
666 qtest_add_data_func("/arm/max/query-cpu-model-expansion/sve-max-vq-8",
667 NULL
, sve_tests_sve_max_vq_8
);
668 qtest_add_data_func("/arm/max/query-cpu-model-expansion/sve-off",
669 NULL
, sve_tests_sve_off
);