1
2
3
4
5
6
7
8
9
10
11#include "qemu/osdep.h"
12#include <glib/gstdio.h>
13#include "contrib/ivshmem-server/ivshmem-server.h"
14#include "libqos/libqos-pc.h"
15#include "libqos/libqos-spapr.h"
16#include "libqtest.h"
17#include "qemu-common.h"
18
19#define TMPSHMSIZE (1 << 20)
20static char *tmpshm;
21static void *tmpshmem;
22static char *tmpdir;
23static char *tmpserver;
24
25static void save_fn(QPCIDevice *dev, int devfn, void *data)
26{
27 QPCIDevice **pdev = (QPCIDevice **) data;
28
29 *pdev = dev;
30}
31
32static QPCIDevice *get_device(QPCIBus *pcibus)
33{
34 QPCIDevice *dev;
35
36 dev = NULL;
37 qpci_device_foreach(pcibus, 0x1af4, 0x1110, save_fn, &dev);
38 g_assert(dev != NULL);
39
40 return dev;
41}
42
43typedef struct _IVState {
44 QOSState *qs;
45 QPCIBar reg_bar, mem_bar;
46 QPCIDevice *dev;
47} IVState;
48
49enum Reg {
50 INTRMASK = 0,
51 INTRSTATUS = 4,
52 IVPOSITION = 8,
53 DOORBELL = 12,
54};
55
56static const char* reg2str(enum Reg reg) {
57 switch (reg) {
58 case INTRMASK:
59 return "IntrMask";
60 case INTRSTATUS:
61 return "IntrStatus";
62 case IVPOSITION:
63 return "IVPosition";
64 case DOORBELL:
65 return "DoorBell";
66 default:
67 return NULL;
68 }
69}
70
71static inline unsigned in_reg(IVState *s, enum Reg reg)
72{
73 const char *name = reg2str(reg);
74 QTestState *qtest = global_qtest;
75 unsigned res;
76
77 global_qtest = s->qs->qts;
78 res = qpci_io_readl(s->dev, s->reg_bar, reg);
79 g_test_message("*%s -> %x\n", name, res);
80 global_qtest = qtest;
81
82 return res;
83}
84
85static inline void out_reg(IVState *s, enum Reg reg, unsigned v)
86{
87 const char *name = reg2str(reg);
88 QTestState *qtest = global_qtest;
89
90 global_qtest = s->qs->qts;
91 g_test_message("%x -> *%s\n", v, name);
92 qpci_io_writel(s->dev, s->reg_bar, reg, v);
93 global_qtest = qtest;
94}
95
96static inline void read_mem(IVState *s, uint64_t off, void *buf, size_t len)
97{
98 QTestState *qtest = global_qtest;
99
100 global_qtest = s->qs->qts;
101 qpci_memread(s->dev, s->mem_bar, off, buf, len);
102 global_qtest = qtest;
103}
104
105static inline void write_mem(IVState *s, uint64_t off,
106 const void *buf, size_t len)
107{
108 QTestState *qtest = global_qtest;
109
110 global_qtest = s->qs->qts;
111 qpci_memwrite(s->dev, s->mem_bar, off, buf, len);
112 global_qtest = qtest;
113}
114
115static void cleanup_vm(IVState *s)
116{
117 g_free(s->dev);
118 qtest_shutdown(s->qs);
119}
120
121static void setup_vm_cmd(IVState *s, const char *cmd, bool msix)
122{
123 uint64_t barsize;
124 const char *arch = qtest_get_arch();
125
126 if (strcmp(arch, "i386") == 0 || strcmp(arch, "x86_64") == 0) {
127 s->qs = qtest_pc_boot(cmd);
128 } else if (strcmp(arch, "ppc64") == 0) {
129 s->qs = qtest_spapr_boot(cmd);
130 } else {
131 g_printerr("ivshmem-test tests are only available on x86 or ppc64\n");
132 exit(EXIT_FAILURE);
133 }
134 global_qtest = s->qs->qts;
135 s->dev = get_device(s->qs->pcibus);
136
137 s->reg_bar = qpci_iomap(s->dev, 0, &barsize);
138 g_assert_cmpuint(barsize, ==, 256);
139
140 if (msix) {
141 qpci_msix_enable(s->dev);
142 }
143
144 s->mem_bar = qpci_iomap(s->dev, 2, &barsize);
145 g_assert_cmpuint(barsize, ==, TMPSHMSIZE);
146
147 qpci_device_enable(s->dev);
148}
149
150static void setup_vm(IVState *s)
151{
152 char *cmd = g_strdup_printf("-object memory-backend-file"
153 ",id=mb1,size=1M,share,mem-path=/dev/shm%s"
154 " -device ivshmem-plain,memdev=mb1", tmpshm);
155
156 setup_vm_cmd(s, cmd, false);
157
158 g_free(cmd);
159}
160
161static void test_ivshmem_single(void)
162{
163 IVState state, *s;
164 uint32_t data[1024];
165 int i;
166
167 setup_vm(&state);
168 s = &state;
169
170
171 g_assert_cmpuint(in_reg(s, INTRMASK), ==, 0);
172 g_assert_cmpuint(in_reg(s, INTRSTATUS), ==, 0);
173 g_assert_cmpuint(in_reg(s, IVPOSITION), ==, 0);
174
175
176 out_reg(s, INTRMASK, 0xffffffff);
177 g_assert_cmpuint(in_reg(s, INTRMASK), ==, 0xffffffff);
178 out_reg(s, INTRSTATUS, 1);
179
180 g_assert_cmpuint(in_reg(s, INTRSTATUS), ==, 1);
181
182 g_assert_cmpuint(in_reg(s, INTRSTATUS), ==, 0);
183
184
185
186 out_reg(s, IVPOSITION, 1);
187 in_reg(s, DOORBELL);
188
189
190 out_reg(s, DOORBELL, 8 << 16);
191
192
193 for (i = 0; i < G_N_ELEMENTS(data); i++) {
194 data[i] = i;
195 }
196 write_mem(s, 0, data, sizeof(data));
197
198
199 for (i = 0; i < G_N_ELEMENTS(data); i++) {
200 g_assert_cmpuint(((uint32_t *)tmpshmem)[i], ==, i);
201 }
202
203
204 memset(data, 0, sizeof(data));
205 read_mem(s, 0, data, sizeof(data));
206 for (i = 0; i < G_N_ELEMENTS(data); i++) {
207 g_assert_cmpuint(data[i], ==, i);
208 }
209
210 cleanup_vm(s);
211}
212
213static void test_ivshmem_pair(void)
214{
215 IVState state1, state2, *s1, *s2;
216 char *data;
217 int i;
218
219 setup_vm(&state1);
220 s1 = &state1;
221 setup_vm(&state2);
222 s2 = &state2;
223
224 data = g_malloc0(TMPSHMSIZE);
225
226
227 memset(tmpshmem, 0x42, TMPSHMSIZE);
228 read_mem(s1, 0, data, TMPSHMSIZE);
229 for (i = 0; i < TMPSHMSIZE; i++) {
230 g_assert_cmpuint(data[i], ==, 0x42);
231 }
232 read_mem(s2, 0, data, TMPSHMSIZE);
233 for (i = 0; i < TMPSHMSIZE; i++) {
234 g_assert_cmpuint(data[i], ==, 0x42);
235 }
236
237
238 memset(data, 0x43, TMPSHMSIZE);
239 write_mem(s1, 0, data, TMPSHMSIZE);
240 memset(data, 0, TMPSHMSIZE);
241 read_mem(s2, 0, data, TMPSHMSIZE);
242 for (i = 0; i < TMPSHMSIZE; i++) {
243 g_assert_cmpuint(data[i], ==, 0x43);
244 }
245
246
247 memset(data, 0x44, TMPSHMSIZE);
248 write_mem(s2, 0, data, TMPSHMSIZE);
249 memset(data, 0, TMPSHMSIZE);
250 read_mem(s1, 0, data, TMPSHMSIZE);
251 for (i = 0; i < TMPSHMSIZE; i++) {
252 g_assert_cmpuint(data[i], ==, 0x44);
253 }
254
255 cleanup_vm(s1);
256 cleanup_vm(s2);
257 g_free(data);
258}
259
260typedef struct ServerThread {
261 GThread *thread;
262 IvshmemServer *server;
263 int pipe[2];
264} ServerThread;
265
266static void *server_thread(void *data)
267{
268 ServerThread *t = data;
269 IvshmemServer *server = t->server;
270
271 while (true) {
272 fd_set fds;
273 int maxfd, ret;
274
275 FD_ZERO(&fds);
276 FD_SET(t->pipe[0], &fds);
277 maxfd = t->pipe[0] + 1;
278
279 ivshmem_server_get_fds(server, &fds, &maxfd);
280
281 ret = select(maxfd, &fds, NULL, NULL, NULL);
282
283 if (ret < 0) {
284 if (errno == EINTR) {
285 continue;
286 }
287
288 g_critical("select error: %s\n", strerror(errno));
289 break;
290 }
291 if (ret == 0) {
292 continue;
293 }
294
295 if (FD_ISSET(t->pipe[0], &fds)) {
296 break;
297 }
298
299 if (ivshmem_server_handle_fds(server, &fds, maxfd) < 0) {
300 g_critical("ivshmem_server_handle_fds() failed\n");
301 break;
302 }
303 }
304
305 return NULL;
306}
307
308static void setup_vm_with_server(IVState *s, int nvectors, bool msi)
309{
310 char *cmd = g_strdup_printf("-chardev socket,id=chr0,path=%s,nowait "
311 "-device ivshmem%s,chardev=chr0,vectors=%d",
312 tmpserver,
313 msi ? "-doorbell" : ",size=1M,msi=off",
314 nvectors);
315
316 setup_vm_cmd(s, cmd, msi);
317
318 g_free(cmd);
319}
320
321static void test_ivshmem_server(bool msi)
322{
323 IVState state1, state2, *s1, *s2;
324 ServerThread thread;
325 IvshmemServer server;
326 int ret, vm1, vm2;
327 int nvectors = 2;
328 guint64 end_time = g_get_monotonic_time() + 5 * G_TIME_SPAN_SECOND;
329
330 ret = ivshmem_server_init(&server, tmpserver, tmpshm, true,
331 TMPSHMSIZE, nvectors,
332 g_test_verbose());
333 g_assert_cmpint(ret, ==, 0);
334
335 ret = ivshmem_server_start(&server);
336 g_assert_cmpint(ret, ==, 0);
337
338 thread.server = &server;
339 ret = pipe(thread.pipe);
340 g_assert_cmpint(ret, ==, 0);
341 thread.thread = g_thread_new("ivshmem-server", server_thread, &thread);
342 g_assert(thread.thread != NULL);
343
344 setup_vm_with_server(&state1, nvectors, msi);
345 s1 = &state1;
346 setup_vm_with_server(&state2, nvectors, msi);
347 s2 = &state2;
348
349
350 vm1 = in_reg(s1, IVPOSITION);
351 vm2 = in_reg(s2, IVPOSITION);
352 g_assert_cmpint(vm1, >=, 0);
353 g_assert_cmpint(vm2, >=, 0);
354 g_assert_cmpint(vm1, !=, vm2);
355
356
357 global_qtest = s1->qs->qts;
358 if (msi) {
359 ret = qpci_msix_table_size(s1->dev);
360 g_assert_cmpuint(ret, ==, nvectors);
361 }
362
363
364
365
366 if (msi) {
367 ret = qpci_msix_pending(s1->dev, 0);
368 g_assert_cmpuint(ret, ==, 0);
369 } else {
370 g_assert_cmpuint(in_reg(s1, INTRSTATUS), ==, 0);
371 }
372 out_reg(s2, DOORBELL, vm1 << 16);
373 do {
374 g_usleep(10000);
375 ret = msi ? qpci_msix_pending(s1->dev, 0) : in_reg(s1, INTRSTATUS);
376 } while (ret == 0 && g_get_monotonic_time() < end_time);
377 g_assert_cmpuint(ret, !=, 0);
378
379
380 global_qtest = s2->qs->qts;
381 if (msi) {
382 ret = qpci_msix_pending(s2->dev, 1);
383 g_assert_cmpuint(ret, ==, 0);
384 } else {
385 g_assert_cmpuint(in_reg(s2, INTRSTATUS), ==, 0);
386 }
387 out_reg(s1, DOORBELL, vm2 << 16 | 1);
388 do {
389 g_usleep(10000);
390 ret = msi ? qpci_msix_pending(s2->dev, 1) : in_reg(s2, INTRSTATUS);
391 } while (ret == 0 && g_get_monotonic_time() < end_time);
392 g_assert_cmpuint(ret, !=, 0);
393
394 cleanup_vm(s2);
395 cleanup_vm(s1);
396
397 if (qemu_write_full(thread.pipe[1], "q", 1) != 1) {
398 g_error("qemu_write_full: %s", g_strerror(errno));
399 }
400
401 g_thread_join(thread.thread);
402
403 ivshmem_server_close(&server);
404 close(thread.pipe[1]);
405 close(thread.pipe[0]);
406}
407
408static void test_ivshmem_server_msi(void)
409{
410 test_ivshmem_server(true);
411}
412
413static void test_ivshmem_server_irq(void)
414{
415 test_ivshmem_server(false);
416}
417
418#define PCI_SLOT_HP 0x06
419
420static void test_ivshmem_hotplug(void)
421{
422 const char *arch = qtest_get_arch();
423 gchar *opts;
424
425 qtest_start("");
426
427 opts = g_strdup_printf("'shm': '%s', 'size': '1M'", tmpshm);
428
429 qpci_plug_device_test("ivshmem", "iv1", PCI_SLOT_HP, opts);
430 if (strcmp(arch, "ppc64") != 0) {
431 qpci_unplug_acpi_device_test("iv1", PCI_SLOT_HP);
432 }
433
434 qtest_end();
435 g_free(opts);
436}
437
438static void test_ivshmem_memdev(void)
439{
440 IVState state;
441
442
443 setup_vm_cmd(&state, "-object memory-backend-ram,size=1M,id=mb1"
444 " -device ivshmem-plain,memdev=mb1", false);
445
446 cleanup_vm(&state);
447}
448
449static void cleanup(void)
450{
451 if (tmpshmem) {
452 munmap(tmpshmem, TMPSHMSIZE);
453 tmpshmem = NULL;
454 }
455
456 if (tmpshm) {
457 shm_unlink(tmpshm);
458 g_free(tmpshm);
459 tmpshm = NULL;
460 }
461
462 if (tmpserver) {
463 g_unlink(tmpserver);
464 g_free(tmpserver);
465 tmpserver = NULL;
466 }
467
468 if (tmpdir) {
469 g_rmdir(tmpdir);
470 tmpdir = NULL;
471 }
472}
473
474static void abrt_handler(void *data)
475{
476 cleanup();
477}
478
479static gchar *mktempshm(int size, int *fd)
480{
481 while (true) {
482 gchar *name;
483
484 name = g_strdup_printf("/qtest-%u-%u", getpid(), g_random_int());
485 *fd = shm_open(name, O_CREAT|O_RDWR|O_EXCL,
486 S_IRWXU|S_IRWXG|S_IRWXO);
487 if (*fd > 0) {
488 g_assert(ftruncate(*fd, size) == 0);
489 return name;
490 }
491
492 g_free(name);
493
494 if (errno != EEXIST) {
495 perror("shm_open");
496 return NULL;
497 }
498 }
499}
500
501int main(int argc, char **argv)
502{
503 int ret, fd;
504 const char *arch = qtest_get_arch();
505 gchar dir[] = "/tmp/ivshmem-test.XXXXXX";
506
507 g_test_init(&argc, &argv, NULL);
508
509 qtest_add_abrt_handler(abrt_handler, NULL);
510
511 tmpshm = mktempshm(TMPSHMSIZE, &fd);
512 if (!tmpshm) {
513 return 0;
514 }
515 tmpshmem = mmap(0, TMPSHMSIZE, PROT_READ|PROT_WRITE, MAP_SHARED, fd, 0);
516 g_assert(tmpshmem != MAP_FAILED);
517
518 if (mkdtemp(dir) == NULL) {
519 g_error("mkdtemp: %s", g_strerror(errno));
520 }
521 tmpdir = dir;
522 tmpserver = g_strconcat(tmpdir, "/server", NULL);
523
524 qtest_add_func("/ivshmem/single", test_ivshmem_single);
525 qtest_add_func("/ivshmem/hotplug", test_ivshmem_hotplug);
526 qtest_add_func("/ivshmem/memdev", test_ivshmem_memdev);
527 if (g_test_slow()) {
528 qtest_add_func("/ivshmem/pair", test_ivshmem_pair);
529 if (strcmp(arch, "ppc64") != 0) {
530 qtest_add_func("/ivshmem/server-msi", test_ivshmem_server_msi);
531 qtest_add_func("/ivshmem/server-irq", test_ivshmem_server_irq);
532 }
533 }
534
535 ret = g_test_run();
536
537 cleanup();
538
539 return ret;
540}
541
