linux-user: Support for restarting system calls for OpenRISC targets
[qemu.git] / tests / pvpanic-test.c
1 /*
2 * QTest testcase for PV Panic
3 *
4 * Copyright (c) 2014 SUSE LINUX Products GmbH
5 *
6 * This work is licensed under the terms of the GNU GPL, version 2 or later.
7 * See the COPYING file in the top-level directory.
8 */
9
10 #include "qemu/osdep.h"
11 #include <glib.h>
12 #include "libqtest.h"
13
14 static void test_panic(void)
15 {
16 uint8_t val;
17 QDict *response, *data;
18
19 val = inb(0x505);
20 g_assert_cmpuint(val, ==, 1);
21
22 outb(0x505, 0x1);
23
24 response = qmp_receive();
25 g_assert(qdict_haskey(response, "event"));
26 g_assert_cmpstr(qdict_get_str(response, "event"), ==, "GUEST_PANICKED");
27 g_assert(qdict_haskey(response, "data"));
28 data = qdict_get_qdict(response, "data");
29 g_assert(qdict_haskey(data, "action"));
30 g_assert_cmpstr(qdict_get_str(data, "action"), ==, "pause");
31 }
32
33 int main(int argc, char **argv)
34 {
35 int ret;
36
37 g_test_init(&argc, &argv, NULL);
38 qtest_add_func("/pvpanic/panic", test_panic);
39
40 qtest_start("-device pvpanic");
41 ret = g_test_run();
42
43 qtest_end();
44
45 return ret;
46 }