4 * Copyright IBM, Corp. 2012
5 * Copyright Red Hat, Inc. 2012
6 * Copyright SUSE LINUX Products GmbH 2013
9 * Anthony Liguori <aliguori@us.ibm.com>
10 * Paolo Bonzini <pbonzini@redhat.com>
11 * Andreas Färber <afaerber@suse.de>
13 * This work is licensed under the terms of the GNU GPL, version 2 or later.
14 * See the COPYING file in the top-level directory.
17 #include "qemu/osdep.h"
19 #include <sys/socket.h>
24 #include "qemu-common.h"
25 #include "qemu/cutils.h"
26 #include "qapi/error.h"
27 #include "qapi/qmp/json-parser.h"
28 #include "qapi/qmp/qdict.h"
29 #include "qapi/qmp/qjson.h"
30 #include "qapi/qmp/qlist.h"
31 #include "qapi/qmp/qstring.h"
34 #define SOCKET_TIMEOUT 50
36 QTestState
*global_qtest
;
42 bool irq_level
[MAX_IRQ
];
44 pid_t qemu_pid
; /* our child QEMU process */
48 static GHookList abrt_hooks
;
49 static struct sigaction sigact_old
;
51 static int qtest_query_target_endianness(QTestState
*s
);
53 static int init_socket(const char *socket_path
)
55 struct sockaddr_un addr
;
59 sock
= socket(PF_UNIX
, SOCK_STREAM
, 0);
60 g_assert_cmpint(sock
, !=, -1);
62 addr
.sun_family
= AF_UNIX
;
63 snprintf(addr
.sun_path
, sizeof(addr
.sun_path
), "%s", socket_path
);
64 qemu_set_cloexec(sock
);
67 ret
= bind(sock
, (struct sockaddr
*)&addr
, sizeof(addr
));
68 } while (ret
== -1 && errno
== EINTR
);
69 g_assert_cmpint(ret
, !=, -1);
70 ret
= listen(sock
, 1);
71 g_assert_cmpint(ret
, !=, -1);
76 static int socket_accept(int sock
)
78 struct sockaddr_un addr
;
81 struct timeval timeout
= { .tv_sec
= SOCKET_TIMEOUT
,
84 setsockopt(sock
, SOL_SOCKET
, SO_RCVTIMEO
, (void *)&timeout
,
88 addrlen
= sizeof(addr
);
89 ret
= accept(sock
, (struct sockaddr
*)&addr
, &addrlen
);
90 } while (ret
== -1 && errno
== EINTR
);
92 fprintf(stderr
, "%s failed: %s\n", __func__
, strerror(errno
));
99 static void kill_qemu(QTestState
*s
)
101 if (s
->qemu_pid
!= -1) {
105 kill(s
->qemu_pid
, SIGTERM
);
106 TFR(pid
= waitpid(s
->qemu_pid
, &wstatus
, 0));
108 assert(pid
== s
->qemu_pid
);
110 * We expect qemu to exit with status 0; anything else is
111 * fishy and should be logged with as much detail as possible.
114 if (WIFEXITED(wstatus
)) {
115 fprintf(stderr
, "%s:%d: kill_qemu() tried to terminate QEMU "
116 "process but encountered exit status %d\n",
117 __FILE__
, __LINE__
, WEXITSTATUS(wstatus
));
118 } else if (WIFSIGNALED(wstatus
)) {
119 int sig
= WTERMSIG(wstatus
);
120 const char *signame
= strsignal(sig
) ?: "unknown ???";
121 const char *dump
= WCOREDUMP(wstatus
) ? " (core dumped)" : "";
123 fprintf(stderr
, "%s:%d: kill_qemu() detected QEMU death "
124 "from signal %d (%s)%s\n",
125 __FILE__
, __LINE__
, sig
, signame
, dump
);
132 static void kill_qemu_hook_func(void *s
)
137 static void sigabrt_handler(int signo
)
139 g_hook_list_invoke(&abrt_hooks
, FALSE
);
142 static void setup_sigabrt_handler(void)
144 struct sigaction sigact
;
146 /* Catch SIGABRT to clean up on g_assert() failure */
147 sigact
= (struct sigaction
){
148 .sa_handler
= sigabrt_handler
,
149 .sa_flags
= SA_RESETHAND
,
151 sigemptyset(&sigact
.sa_mask
);
152 sigaction(SIGABRT
, &sigact
, &sigact_old
);
155 static void cleanup_sigabrt_handler(void)
157 sigaction(SIGABRT
, &sigact_old
, NULL
);
160 void qtest_add_abrt_handler(GHookFunc fn
, const void *data
)
164 /* Only install SIGABRT handler once */
165 if (!abrt_hooks
.is_setup
) {
166 g_hook_list_init(&abrt_hooks
, sizeof(GHook
));
168 setup_sigabrt_handler();
170 hook
= g_hook_alloc(&abrt_hooks
);
172 hook
->data
= (void *)data
;
174 g_hook_prepend(&abrt_hooks
, hook
);
177 static const char *qtest_qemu_binary(void)
179 const char *qemu_bin
;
181 qemu_bin
= getenv("QTEST_QEMU_BINARY");
183 fprintf(stderr
, "Environment variable QTEST_QEMU_BINARY required\n");
190 QTestState
*qtest_init_without_qmp_handshake(bool use_oob
,
191 const char *extra_args
)
194 int sock
, qmpsock
, i
;
196 gchar
*qmp_socket_path
;
198 const char *qemu_binary
= qtest_qemu_binary();
200 s
= g_new(QTestState
, 1);
202 socket_path
= g_strdup_printf("/tmp/qtest-%d.sock", getpid());
203 qmp_socket_path
= g_strdup_printf("/tmp/qtest-%d.qmp", getpid());
205 /* It's possible that if an earlier test run crashed it might
206 * have left a stale unix socket lying around. Delete any
207 * stale old socket to avoid spurious test failures with
208 * tests/libqtest.c:70:init_socket: assertion failed (ret != -1): (-1 != -1)
211 unlink(qmp_socket_path
);
213 sock
= init_socket(socket_path
);
214 qmpsock
= init_socket(qmp_socket_path
);
216 qtest_add_abrt_handler(kill_qemu_hook_func
, s
);
218 command
= g_strdup_printf("exec %s "
219 "-qtest unix:%s,nowait "
221 "-chardev socket,path=%s,nowait,id=char0 "
222 "-mon chardev=char0,mode=control%s "
223 "-machine accel=qtest "
225 "%s", qemu_binary
, socket_path
,
226 getenv("QTEST_LOG") ? "/dev/fd/2" : "/dev/null",
227 qmp_socket_path
, use_oob
? ",x-oob=on" : "",
230 g_test_message("starting QEMU: %s", command
);
232 s
->qemu_pid
= fork();
233 if (s
->qemu_pid
== 0) {
234 setenv("QEMU_AUDIO_DRV", "none", true);
235 execlp("/bin/sh", "sh", "-c", command
, NULL
);
240 s
->fd
= socket_accept(sock
);
242 s
->qmp_fd
= socket_accept(qmpsock
);
245 unlink(qmp_socket_path
);
247 g_free(qmp_socket_path
);
249 g_assert(s
->fd
>= 0 && s
->qmp_fd
>= 0);
251 s
->rx
= g_string_new("");
252 for (i
= 0; i
< MAX_IRQ
; i
++) {
253 s
->irq_level
[i
] = false;
256 if (getenv("QTEST_STOP")) {
257 kill(s
->qemu_pid
, SIGSTOP
);
260 /* ask endianness of the target */
262 s
->big_endian
= qtest_query_target_endianness(s
);
267 QTestState
*qtest_init(const char *extra_args
)
269 QTestState
*s
= qtest_init_without_qmp_handshake(false, extra_args
);
272 /* Read the QMP greeting and then do the handshake */
273 greeting
= qtest_qmp_receive(s
);
274 qobject_unref(greeting
);
275 qobject_unref(qtest_qmp(s
, "{ 'execute': 'qmp_capabilities' }"));
280 QTestState
*qtest_vinitf(const char *fmt
, va_list ap
)
282 char *args
= g_strdup_vprintf(fmt
, ap
);
285 s
= qtest_init(args
);
290 QTestState
*qtest_initf(const char *fmt
, ...)
296 s
= qtest_vinitf(fmt
, ap
);
301 void qtest_quit(QTestState
*s
)
303 g_hook_destroy_link(&abrt_hooks
, g_hook_find_data(&abrt_hooks
, TRUE
, s
));
305 /* Uninstall SIGABRT handler on last instance */
306 cleanup_sigabrt_handler();
311 g_string_free(s
->rx
, true);
315 static void socket_send(int fd
, const char *buf
, size_t size
)
320 while (offset
< size
) {
323 len
= write(fd
, buf
+ offset
, size
- offset
);
324 if (len
== -1 && errno
== EINTR
) {
328 g_assert_cmpint(len
, >, 0);
334 static void socket_sendf(int fd
, const char *fmt
, va_list ap
)
336 gchar
*str
= g_strdup_vprintf(fmt
, ap
);
337 size_t size
= strlen(str
);
339 socket_send(fd
, str
, size
);
343 static void GCC_FMT_ATTR(2, 3) qtest_sendf(QTestState
*s
, const char *fmt
, ...)
348 socket_sendf(s
->fd
, fmt
, ap
);
352 static GString
*qtest_recv_line(QTestState
*s
)
358 while ((eol
= strchr(s
->rx
->str
, '\n')) == NULL
) {
362 len
= read(s
->fd
, buffer
, sizeof(buffer
));
363 if (len
== -1 && errno
== EINTR
) {
367 if (len
== -1 || len
== 0) {
368 fprintf(stderr
, "Broken pipe\n");
372 g_string_append_len(s
->rx
, buffer
, len
);
375 offset
= eol
- s
->rx
->str
;
376 line
= g_string_new_len(s
->rx
->str
, offset
);
377 g_string_erase(s
->rx
, 0, offset
+ 1);
382 static gchar
**qtest_rsp(QTestState
*s
, int expected_args
)
389 line
= qtest_recv_line(s
);
390 words
= g_strsplit(line
->str
, " ", 0);
391 g_string_free(line
, TRUE
);
393 if (strcmp(words
[0], "IRQ") == 0) {
397 g_assert(words
[1] != NULL
);
398 g_assert(words
[2] != NULL
);
400 ret
= qemu_strtol(words
[2], NULL
, 0, &irq
);
402 g_assert_cmpint(irq
, >=, 0);
403 g_assert_cmpint(irq
, <, MAX_IRQ
);
405 if (strcmp(words
[1], "raise") == 0) {
406 s
->irq_level
[irq
] = true;
408 s
->irq_level
[irq
] = false;
415 g_assert(words
[0] != NULL
);
416 g_assert_cmpstr(words
[0], ==, "OK");
419 for (i
= 0; i
< expected_args
; i
++) {
420 g_assert(words
[i
] != NULL
);
429 static int qtest_query_target_endianness(QTestState
*s
)
434 qtest_sendf(s
, "endianness\n");
435 args
= qtest_rsp(s
, 1);
436 g_assert(strcmp(args
[1], "big") == 0 || strcmp(args
[1], "little") == 0);
437 big_endian
= strcmp(args
[1], "big") == 0;
444 JSONMessageParser parser
;
448 static void qmp_response(void *opaque
, QObject
*obj
, Error
*err
)
450 QMPResponseParser
*qmp
= opaque
;
452 assert(!obj
!= !err
);
455 error_prepend(&err
, "QMP JSON response parsing failed: ");
456 error_report_err(err
);
460 g_assert(!qmp
->response
);
461 qmp
->response
= qobject_to(QDict
, obj
);
462 g_assert(qmp
->response
);
465 QDict
*qmp_fd_receive(int fd
)
467 QMPResponseParser qmp
;
468 bool log
= getenv("QTEST_LOG") != NULL
;
471 json_message_parser_init(&qmp
.parser
, qmp_response
, &qmp
, NULL
);
472 while (!qmp
.response
) {
476 len
= read(fd
, &c
, 1);
477 if (len
== -1 && errno
== EINTR
) {
481 if (len
== -1 || len
== 0) {
482 fprintf(stderr
, "Broken pipe\n");
487 len
= write(2, &c
, 1);
489 json_message_parser_feed(&qmp
.parser
, &c
, 1);
491 json_message_parser_destroy(&qmp
.parser
);
496 QDict
*qtest_qmp_receive(QTestState
*s
)
498 return qmp_fd_receive(s
->qmp_fd
);
502 * Allow users to send a message without waiting for the reply,
503 * in the case that they choose to discard all replies up until
504 * a particular EVENT is received.
506 void qmp_fd_vsend(int fd
, const char *fmt
, va_list ap
)
510 /* Going through qobject ensures we escape strings properly */
511 qobj
= qobject_from_vjsonf_nofail(fmt
, ap
);
513 /* No need to send anything for an empty QObject. */
515 int log
= getenv("QTEST_LOG") != NULL
;
516 QString
*qstr
= qobject_to_json(qobj
);
520 * BUG: QMP doesn't react to input until it sees a newline, an
521 * object, or an array. Work-around: give it a newline.
523 qstring_append_chr(qstr
, '\n');
524 str
= qstring_get_str(qstr
);
527 fprintf(stderr
, "%s", str
);
529 /* Send QMP request */
530 socket_send(fd
, str
, qstring_get_length(qstr
));
537 void qtest_qmp_vsend(QTestState
*s
, const char *fmt
, va_list ap
)
539 qmp_fd_vsend(s
->qmp_fd
, fmt
, ap
);
542 QDict
*qmp_fdv(int fd
, const char *fmt
, va_list ap
)
544 qmp_fd_vsend(fd
, fmt
, ap
);
546 return qmp_fd_receive(fd
);
549 QDict
*qtest_vqmp(QTestState
*s
, const char *fmt
, va_list ap
)
551 qtest_qmp_vsend(s
, fmt
, ap
);
554 return qtest_qmp_receive(s
);
557 QDict
*qmp_fd(int fd
, const char *fmt
, ...)
563 response
= qmp_fdv(fd
, fmt
, ap
);
568 void qmp_fd_send(int fd
, const char *fmt
, ...)
573 qmp_fd_vsend(fd
, fmt
, ap
);
577 QDict
*qtest_qmp(QTestState
*s
, const char *fmt
, ...)
583 response
= qtest_vqmp(s
, fmt
, ap
);
588 void qtest_qmp_send(QTestState
*s
, const char *fmt
, ...)
593 qtest_qmp_vsend(s
, fmt
, ap
);
597 void qmp_fd_vsend_raw(int fd
, const char *fmt
, va_list ap
)
599 bool log
= getenv("QTEST_LOG") != NULL
;
600 char *str
= g_strdup_vprintf(fmt
, ap
);
603 fprintf(stderr
, "%s", str
);
605 socket_send(fd
, str
, strlen(str
));
609 void qmp_fd_send_raw(int fd
, const char *fmt
, ...)
614 qmp_fd_vsend_raw(fd
, fmt
, ap
);
618 void qtest_qmp_send_raw(QTestState
*s
, const char *fmt
, ...)
623 qmp_fd_vsend_raw(s
->qmp_fd
, fmt
, ap
);
627 QDict
*qtest_qmp_eventwait_ref(QTestState
*s
, const char *event
)
632 response
= qtest_qmp_receive(s
);
633 if ((qdict_haskey(response
, "event")) &&
634 (strcmp(qdict_get_str(response
, "event"), event
) == 0)) {
637 qobject_unref(response
);
641 void qtest_qmp_eventwait(QTestState
*s
, const char *event
)
645 response
= qtest_qmp_eventwait_ref(s
, event
);
646 qobject_unref(response
);
649 char *qtest_vhmp(QTestState
*s
, const char *fmt
, va_list ap
)
655 cmd
= g_strdup_vprintf(fmt
, ap
);
656 resp
= qtest_qmp(s
, "{'execute': 'human-monitor-command',"
657 " 'arguments': {'command-line': %s}}",
659 ret
= g_strdup(qdict_get_try_str(resp
, "return"));
660 while (ret
== NULL
&& qdict_get_try_str(resp
, "event")) {
661 /* Ignore asynchronous QMP events */
663 resp
= qtest_qmp_receive(s
);
664 ret
= g_strdup(qdict_get_try_str(resp
, "return"));
672 char *qtest_hmp(QTestState
*s
, const char *fmt
, ...)
678 ret
= qtest_vhmp(s
, fmt
, ap
);
683 const char *qtest_get_arch(void)
685 const char *qemu
= qtest_qemu_binary();
686 const char *end
= strrchr(qemu
, '/');
688 return end
+ strlen("/qemu-system-");
691 bool qtest_get_irq(QTestState
*s
, int num
)
693 /* dummy operation in order to make sure irq is up to date */
696 return s
->irq_level
[num
];
699 static int64_t qtest_clock_rsp(QTestState
*s
)
703 words
= qtest_rsp(s
, 2);
704 clock
= g_ascii_strtoll(words
[1], NULL
, 0);
709 int64_t qtest_clock_step_next(QTestState
*s
)
711 qtest_sendf(s
, "clock_step\n");
712 return qtest_clock_rsp(s
);
715 int64_t qtest_clock_step(QTestState
*s
, int64_t step
)
717 qtest_sendf(s
, "clock_step %"PRIi64
"\n", step
);
718 return qtest_clock_rsp(s
);
721 int64_t qtest_clock_set(QTestState
*s
, int64_t val
)
723 qtest_sendf(s
, "clock_set %"PRIi64
"\n", val
);
724 return qtest_clock_rsp(s
);
727 void qtest_irq_intercept_out(QTestState
*s
, const char *qom_path
)
729 qtest_sendf(s
, "irq_intercept_out %s\n", qom_path
);
733 void qtest_irq_intercept_in(QTestState
*s
, const char *qom_path
)
735 qtest_sendf(s
, "irq_intercept_in %s\n", qom_path
);
739 static void qtest_out(QTestState
*s
, const char *cmd
, uint16_t addr
, uint32_t value
)
741 qtest_sendf(s
, "%s 0x%x 0x%x\n", cmd
, addr
, value
);
745 void qtest_outb(QTestState
*s
, uint16_t addr
, uint8_t value
)
747 qtest_out(s
, "outb", addr
, value
);
750 void qtest_outw(QTestState
*s
, uint16_t addr
, uint16_t value
)
752 qtest_out(s
, "outw", addr
, value
);
755 void qtest_outl(QTestState
*s
, uint16_t addr
, uint32_t value
)
757 qtest_out(s
, "outl", addr
, value
);
760 static uint32_t qtest_in(QTestState
*s
, const char *cmd
, uint16_t addr
)
766 qtest_sendf(s
, "%s 0x%x\n", cmd
, addr
);
767 args
= qtest_rsp(s
, 2);
768 ret
= qemu_strtoul(args
[1], NULL
, 0, &value
);
769 g_assert(!ret
&& value
<= UINT32_MAX
);
775 uint8_t qtest_inb(QTestState
*s
, uint16_t addr
)
777 return qtest_in(s
, "inb", addr
);
780 uint16_t qtest_inw(QTestState
*s
, uint16_t addr
)
782 return qtest_in(s
, "inw", addr
);
785 uint32_t qtest_inl(QTestState
*s
, uint16_t addr
)
787 return qtest_in(s
, "inl", addr
);
790 static void qtest_write(QTestState
*s
, const char *cmd
, uint64_t addr
,
793 qtest_sendf(s
, "%s 0x%" PRIx64
" 0x%" PRIx64
"\n", cmd
, addr
, value
);
797 void qtest_writeb(QTestState
*s
, uint64_t addr
, uint8_t value
)
799 qtest_write(s
, "writeb", addr
, value
);
802 void qtest_writew(QTestState
*s
, uint64_t addr
, uint16_t value
)
804 qtest_write(s
, "writew", addr
, value
);
807 void qtest_writel(QTestState
*s
, uint64_t addr
, uint32_t value
)
809 qtest_write(s
, "writel", addr
, value
);
812 void qtest_writeq(QTestState
*s
, uint64_t addr
, uint64_t value
)
814 qtest_write(s
, "writeq", addr
, value
);
817 static uint64_t qtest_read(QTestState
*s
, const char *cmd
, uint64_t addr
)
823 qtest_sendf(s
, "%s 0x%" PRIx64
"\n", cmd
, addr
);
824 args
= qtest_rsp(s
, 2);
825 ret
= qemu_strtou64(args
[1], NULL
, 0, &value
);
832 uint8_t qtest_readb(QTestState
*s
, uint64_t addr
)
834 return qtest_read(s
, "readb", addr
);
837 uint16_t qtest_readw(QTestState
*s
, uint64_t addr
)
839 return qtest_read(s
, "readw", addr
);
842 uint32_t qtest_readl(QTestState
*s
, uint64_t addr
)
844 return qtest_read(s
, "readl", addr
);
847 uint64_t qtest_readq(QTestState
*s
, uint64_t addr
)
849 return qtest_read(s
, "readq", addr
);
852 static int hex2nib(char ch
)
854 if (ch
>= '0' && ch
<= '9') {
856 } else if (ch
>= 'a' && ch
<= 'f') {
857 return 10 + (ch
- 'a');
858 } else if (ch
>= 'A' && ch
<= 'F') {
859 return 10 + (ch
- 'a');
865 void qtest_memread(QTestState
*s
, uint64_t addr
, void *data
, size_t size
)
875 qtest_sendf(s
, "read 0x%" PRIx64
" 0x%zx\n", addr
, size
);
876 args
= qtest_rsp(s
, 2);
878 for (i
= 0; i
< size
; i
++) {
879 ptr
[i
] = hex2nib(args
[1][2 + (i
* 2)]) << 4;
880 ptr
[i
] |= hex2nib(args
[1][2 + (i
* 2) + 1]);
886 uint64_t qtest_rtas_call(QTestState
*s
, const char *name
,
887 uint32_t nargs
, uint64_t args
,
888 uint32_t nret
, uint64_t ret
)
890 qtest_sendf(s
, "rtas %s %u 0x%"PRIx64
" %u 0x%"PRIx64
"\n",
891 name
, nargs
, args
, nret
, ret
);
896 void qtest_add_func(const char *str
, void (*fn
)(void))
898 gchar
*path
= g_strdup_printf("/%s/%s", qtest_get_arch(), str
);
899 g_test_add_func(path
, fn
);
903 void qtest_add_data_func_full(const char *str
, void *data
,
904 void (*fn
)(const void *),
905 GDestroyNotify data_free_func
)
907 gchar
*path
= g_strdup_printf("/%s/%s", qtest_get_arch(), str
);
908 g_test_add_data_func_full(path
, data
, fn
, data_free_func
);
912 void qtest_add_data_func(const char *str
, const void *data
,
913 void (*fn
)(const void *))
915 gchar
*path
= g_strdup_printf("/%s/%s", qtest_get_arch(), str
);
916 g_test_add_data_func(path
, data
, fn
);
920 void qtest_bufwrite(QTestState
*s
, uint64_t addr
, const void *data
, size_t size
)
924 bdata
= g_base64_encode(data
, size
);
925 qtest_sendf(s
, "b64write 0x%" PRIx64
" 0x%zx ", addr
, size
);
926 socket_send(s
->fd
, bdata
, strlen(bdata
));
927 socket_send(s
->fd
, "\n", 1);
932 void qtest_bufread(QTestState
*s
, uint64_t addr
, void *data
, size_t size
)
937 qtest_sendf(s
, "b64read 0x%" PRIx64
" 0x%zx\n", addr
, size
);
938 args
= qtest_rsp(s
, 2);
940 g_base64_decode_inplace(args
[1], &len
);
942 fprintf(stderr
, "bufread: asked for %zu bytes but decoded %zu\n",
944 len
= MIN(len
, size
);
947 memcpy(data
, args
[1], len
);
951 void qtest_memwrite(QTestState
*s
, uint64_t addr
, const void *data
, size_t size
)
953 const uint8_t *ptr
= data
;
961 enc
= g_malloc(2 * size
+ 1);
963 for (i
= 0; i
< size
; i
++) {
964 sprintf(&enc
[i
* 2], "%02x", ptr
[i
]);
967 qtest_sendf(s
, "write 0x%" PRIx64
" 0x%zx 0x%s\n", addr
, size
, enc
);
972 void qtest_memset(QTestState
*s
, uint64_t addr
, uint8_t pattern
, size_t size
)
974 qtest_sendf(s
, "memset 0x%" PRIx64
" 0x%zx 0x%02x\n", addr
, size
, pattern
);
978 QDict
*qmp(const char *fmt
, ...)
984 response
= qtest_vqmp(global_qtest
, fmt
, ap
);
989 void qmp_send(const char *fmt
, ...)
994 qtest_qmp_vsend(global_qtest
, fmt
, ap
);
998 char *hmp(const char *fmt
, ...)
1004 ret
= qtest_vhmp(global_qtest
, fmt
, ap
);
1009 bool qtest_big_endian(QTestState
*s
)
1011 return s
->big_endian
;
1014 static bool qtest_check_machine_version(const char *mname
, const char *basename
,
1015 int major
, int minor
)
1020 newname
= g_strdup_printf("%s-%i.%i", basename
, major
, minor
);
1021 is_equal
= g_str_equal(mname
, newname
);
1027 static bool qtest_is_old_versioned_machine(const char *mname
)
1029 const char *dash
= strrchr(mname
, '-');
1030 const char *dot
= strrchr(mname
, '.');
1033 const int major
= QEMU_VERSION_MAJOR
;
1034 const int minor
= QEMU_VERSION_MINOR
;
1037 if (dash
&& dot
&& dot
> dash
) {
1038 for (chr
= dash
+ 1; *chr
; chr
++) {
1039 if (!qemu_isdigit(*chr
) && *chr
!= '.') {
1044 * Now check if it is one of the latest versions. Check major + 1
1045 * and minor + 1 versions as well, since they might already exist
1046 * in the development branch.
1048 bname
= g_strdup(mname
);
1049 bname
[dash
- mname
] = 0;
1050 res
= !qtest_check_machine_version(mname
, bname
, major
+ 1, 0) &&
1051 !qtest_check_machine_version(mname
, bname
, major
, minor
+ 1) &&
1052 !qtest_check_machine_version(mname
, bname
, major
, minor
);
1059 void qtest_cb_for_every_machine(void (*cb
)(const char *machine
),
1060 bool skip_old_versioned
)
1062 QDict
*response
, *minfo
;
1064 const QListEntry
*p
;
1069 qtest_start("-machine none");
1070 response
= qmp("{ 'execute': 'query-machines' }");
1072 list
= qdict_get_qlist(response
, "return");
1075 for (p
= qlist_first(list
); p
; p
= qlist_next(p
)) {
1076 minfo
= qobject_to(QDict
, qlist_entry_obj(p
));
1078 qobj
= qdict_get(minfo
, "name");
1080 qstr
= qobject_to(QString
, qobj
);
1082 mname
= qstring_get_str(qstr
);
1083 if (!skip_old_versioned
|| !qtest_is_old_versioned_machine(mname
)) {
1089 qobject_unref(response
);
1092 QDict
*qtest_qmp_receive_success(QTestState
*s
,
1093 void (*event_cb
)(void *opaque
,
1098 QDict
*response
, *ret
, *data
;
1102 response
= qtest_qmp_receive(s
);
1103 g_assert(!qdict_haskey(response
, "error"));
1104 ret
= qdict_get_qdict(response
, "return");
1108 event
= qdict_get_str(response
, "event");
1109 data
= qdict_get_qdict(response
, "data");
1111 event_cb(opaque
, event
, data
);
1113 qobject_unref(response
);
1117 qobject_unref(response
);
1122 * Generic hot-plugging test via the device_add QMP command.
1124 void qtest_qmp_device_add(const char *driver
, const char *id
,
1125 const char *fmt
, ...)
1127 QDict
*args
, *response
;
1131 args
= qdict_from_vjsonf_nofail(fmt
, ap
);
1134 g_assert(!qdict_haskey(args
, "driver") && !qdict_haskey(args
, "id"));
1135 qdict_put_str(args
, "driver", driver
);
1136 qdict_put_str(args
, "id", id
);
1138 response
= qmp("{'execute': 'device_add', 'arguments': %p}", args
);
1140 g_assert(!qdict_haskey(response
, "event")); /* We don't expect any events */
1141 g_assert(!qdict_haskey(response
, "error"));
1142 qobject_unref(response
);
1145 static void device_deleted_cb(void *opaque
, const char *name
, QDict
*data
)
1147 bool *got_event
= opaque
;
1149 g_assert_cmpstr(name
, ==, "DEVICE_DELETED");
1154 * Generic hot-unplugging test via the device_del QMP command.
1155 * Device deletion will get one response and one event. For example:
1157 * {'execute': 'device_del','arguments': { 'id': 'scsi-hd'}}
1159 * will get this one:
1161 * {"timestamp": {"seconds": 1505289667, "microseconds": 569862},
1162 * "event": "DEVICE_DELETED", "data": {"device": "scsi-hd",
1163 * "path": "/machine/peripheral/scsi-hd"}}
1169 * But the order of arrival may vary - so we've got to detect both.
1171 void qtest_qmp_device_del(const char *id
)
1173 bool got_event
= false;
1176 qtest_qmp_send(global_qtest
,
1177 "{'execute': 'device_del', 'arguments': {'id': %s}}",
1179 rsp
= qtest_qmp_receive_success(global_qtest
, device_deleted_cb
,
1183 rsp
= qmp_receive();
1184 g_assert_cmpstr(qdict_get_try_str(rsp
, "event"),
1185 ==, "DEVICE_DELETED");
1190 bool qmp_rsp_is_err(QDict
*rsp
)
1192 QDict
*error
= qdict_get_qdict(rsp
, "error");
1197 void qmp_assert_error_class(QDict
*rsp
, const char *class)
1199 QDict
*error
= qdict_get_qdict(rsp
, "error");
1201 g_assert_cmpstr(qdict_get_try_str(error
, "class"), ==, class);
1202 g_assert_nonnull(qdict_get_try_str(error
, "desc"));
1203 g_assert(!qdict_haskey(rsp
, "return"));