]>
Commit | Line | Data |
---|---|---|
1 | /* | |
2 | * QEMU System Emulator | |
3 | * | |
4 | * Copyright (c) 2003-2008 Fabrice Bellard | |
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 | #include <unistd.h> | |
25 | #include <fcntl.h> | |
26 | #include <time.h> | |
27 | #include <errno.h> | |
28 | #include <sys/time.h> | |
29 | #include <zlib.h> | |
30 | ||
31 | /* Needed early for CONFIG_BSD etc. */ | |
32 | #include "config-host.h" | |
33 | ||
34 | #ifndef _WIN32 | |
35 | #include <sys/times.h> | |
36 | #include <sys/wait.h> | |
37 | #include <termios.h> | |
38 | #include <sys/mman.h> | |
39 | #include <sys/ioctl.h> | |
40 | #include <sys/resource.h> | |
41 | #include <sys/socket.h> | |
42 | #include <netinet/in.h> | |
43 | #include <net/if.h> | |
44 | #include <arpa/inet.h> | |
45 | #include <dirent.h> | |
46 | #include <netdb.h> | |
47 | #include <sys/select.h> | |
48 | #ifdef CONFIG_BSD | |
49 | #include <sys/stat.h> | |
50 | #if defined(__FreeBSD__) || defined(__FreeBSD_kernel__) || defined(__DragonFly__) | |
51 | #include <libutil.h> | |
52 | #else | |
53 | #include <util.h> | |
54 | #endif | |
55 | #ifdef __linux__ | |
56 | #include <pty.h> | |
57 | #include <malloc.h> | |
58 | #include <linux/rtc.h> | |
59 | #endif | |
60 | #endif | |
61 | #endif | |
62 | ||
63 | #ifdef _WIN32 | |
64 | #include <windows.h> | |
65 | #include <malloc.h> | |
66 | #include <sys/timeb.h> | |
67 | #include <mmsystem.h> | |
68 | #define getopt_long_only getopt_long | |
69 | #define memalign(align, size) malloc(size) | |
70 | #endif | |
71 | ||
72 | #include "qemu-common.h" | |
73 | #include "hw/hw.h" | |
74 | #include "hw/qdev.h" | |
75 | #include "net.h" | |
76 | #include "monitor.h" | |
77 | #include "sysemu.h" | |
78 | #include "qemu-timer.h" | |
79 | #include "qemu-char.h" | |
80 | #include "audio/audio.h" | |
81 | #include "migration.h" | |
82 | #include "qemu_socket.h" | |
83 | #include "qemu-queue.h" | |
84 | #include "qemu-timer.h" | |
85 | #include "cpus.h" | |
86 | #include "memory.h" | |
87 | #include "qmp-commands.h" | |
88 | #include "trace.h" | |
89 | ||
90 | #define SELF_ANNOUNCE_ROUNDS 5 | |
91 | ||
92 | #ifndef ETH_P_RARP | |
93 | #define ETH_P_RARP 0x8035 | |
94 | #endif | |
95 | #define ARP_HTYPE_ETH 0x0001 | |
96 | #define ARP_PTYPE_IP 0x0800 | |
97 | #define ARP_OP_REQUEST_REV 0x3 | |
98 | ||
99 | static int announce_self_create(uint8_t *buf, | |
100 | uint8_t *mac_addr) | |
101 | { | |
102 | /* Ethernet header. */ | |
103 | memset(buf, 0xff, 6); /* destination MAC addr */ | |
104 | memcpy(buf + 6, mac_addr, 6); /* source MAC addr */ | |
105 | *(uint16_t *)(buf + 12) = htons(ETH_P_RARP); /* ethertype */ | |
106 | ||
107 | /* RARP header. */ | |
108 | *(uint16_t *)(buf + 14) = htons(ARP_HTYPE_ETH); /* hardware addr space */ | |
109 | *(uint16_t *)(buf + 16) = htons(ARP_PTYPE_IP); /* protocol addr space */ | |
110 | *(buf + 18) = 6; /* hardware addr length (ethernet) */ | |
111 | *(buf + 19) = 4; /* protocol addr length (IPv4) */ | |
112 | *(uint16_t *)(buf + 20) = htons(ARP_OP_REQUEST_REV); /* opcode */ | |
113 | memcpy(buf + 22, mac_addr, 6); /* source hw addr */ | |
114 | memset(buf + 28, 0x00, 4); /* source protocol addr */ | |
115 | memcpy(buf + 32, mac_addr, 6); /* target hw addr */ | |
116 | memset(buf + 38, 0x00, 4); /* target protocol addr */ | |
117 | ||
118 | /* Padding to get up to 60 bytes (ethernet min packet size, minus FCS). */ | |
119 | memset(buf + 42, 0x00, 18); | |
120 | ||
121 | return 60; /* len (FCS will be added by hardware) */ | |
122 | } | |
123 | ||
124 | static void qemu_announce_self_iter(NICState *nic, void *opaque) | |
125 | { | |
126 | uint8_t buf[60]; | |
127 | int len; | |
128 | ||
129 | len = announce_self_create(buf, nic->conf->macaddr.a); | |
130 | ||
131 | qemu_send_packet_raw(&nic->nc, buf, len); | |
132 | } | |
133 | ||
134 | ||
135 | static void qemu_announce_self_once(void *opaque) | |
136 | { | |
137 | static int count = SELF_ANNOUNCE_ROUNDS; | |
138 | QEMUTimer *timer = *(QEMUTimer **)opaque; | |
139 | ||
140 | qemu_foreach_nic(qemu_announce_self_iter, NULL); | |
141 | ||
142 | if (--count) { | |
143 | /* delay 50ms, 150ms, 250ms, ... */ | |
144 | qemu_mod_timer(timer, qemu_get_clock_ms(rt_clock) + | |
145 | 50 + (SELF_ANNOUNCE_ROUNDS - count - 1) * 100); | |
146 | } else { | |
147 | qemu_del_timer(timer); | |
148 | qemu_free_timer(timer); | |
149 | } | |
150 | } | |
151 | ||
152 | void qemu_announce_self(void) | |
153 | { | |
154 | static QEMUTimer *timer; | |
155 | timer = qemu_new_timer_ms(rt_clock, qemu_announce_self_once, &timer); | |
156 | qemu_announce_self_once(&timer); | |
157 | } | |
158 | ||
159 | /***********************************************************/ | |
160 | /* savevm/loadvm support */ | |
161 | ||
162 | #define IO_BUF_SIZE 32768 | |
163 | ||
164 | struct QEMUFile { | |
165 | QEMUFilePutBufferFunc *put_buffer; | |
166 | QEMUFileGetBufferFunc *get_buffer; | |
167 | QEMUFileCloseFunc *close; | |
168 | QEMUFileRateLimit *rate_limit; | |
169 | QEMUFileSetRateLimit *set_rate_limit; | |
170 | QEMUFileGetRateLimit *get_rate_limit; | |
171 | void *opaque; | |
172 | int is_write; | |
173 | ||
174 | int64_t buf_offset; /* start of buffer when writing, end of buffer | |
175 | when reading */ | |
176 | int buf_index; | |
177 | int buf_size; /* 0 when writing */ | |
178 | uint8_t buf[IO_BUF_SIZE]; | |
179 | ||
180 | int last_error; | |
181 | }; | |
182 | ||
183 | typedef struct QEMUFileStdio | |
184 | { | |
185 | FILE *stdio_file; | |
186 | QEMUFile *file; | |
187 | } QEMUFileStdio; | |
188 | ||
189 | typedef struct QEMUFileSocket | |
190 | { | |
191 | int fd; | |
192 | QEMUFile *file; | |
193 | } QEMUFileSocket; | |
194 | ||
195 | static int socket_get_buffer(void *opaque, uint8_t *buf, int64_t pos, int size) | |
196 | { | |
197 | QEMUFileSocket *s = opaque; | |
198 | ssize_t len; | |
199 | ||
200 | do { | |
201 | len = qemu_recv(s->fd, buf, size, 0); | |
202 | } while (len == -1 && socket_error() == EINTR); | |
203 | ||
204 | if (len == -1) | |
205 | len = -socket_error(); | |
206 | ||
207 | return len; | |
208 | } | |
209 | ||
210 | static int socket_close(void *opaque) | |
211 | { | |
212 | QEMUFileSocket *s = opaque; | |
213 | g_free(s); | |
214 | return 0; | |
215 | } | |
216 | ||
217 | static int stdio_put_buffer(void *opaque, const uint8_t *buf, int64_t pos, int size) | |
218 | { | |
219 | QEMUFileStdio *s = opaque; | |
220 | return fwrite(buf, 1, size, s->stdio_file); | |
221 | } | |
222 | ||
223 | static int stdio_get_buffer(void *opaque, uint8_t *buf, int64_t pos, int size) | |
224 | { | |
225 | QEMUFileStdio *s = opaque; | |
226 | FILE *fp = s->stdio_file; | |
227 | int bytes; | |
228 | ||
229 | do { | |
230 | clearerr(fp); | |
231 | bytes = fread(buf, 1, size, fp); | |
232 | } while ((bytes == 0) && ferror(fp) && (errno == EINTR)); | |
233 | return bytes; | |
234 | } | |
235 | ||
236 | static int stdio_pclose(void *opaque) | |
237 | { | |
238 | QEMUFileStdio *s = opaque; | |
239 | int ret; | |
240 | ret = pclose(s->stdio_file); | |
241 | if (ret == -1) { | |
242 | ret = -errno; | |
243 | } | |
244 | g_free(s); | |
245 | return ret; | |
246 | } | |
247 | ||
248 | static int stdio_fclose(void *opaque) | |
249 | { | |
250 | QEMUFileStdio *s = opaque; | |
251 | int ret = 0; | |
252 | if (fclose(s->stdio_file) == EOF) { | |
253 | ret = -errno; | |
254 | } | |
255 | g_free(s); | |
256 | return ret; | |
257 | } | |
258 | ||
259 | QEMUFile *qemu_popen(FILE *stdio_file, const char *mode) | |
260 | { | |
261 | QEMUFileStdio *s; | |
262 | ||
263 | if (stdio_file == NULL || mode == NULL || (mode[0] != 'r' && mode[0] != 'w') || mode[1] != 0) { | |
264 | fprintf(stderr, "qemu_popen: Argument validity check failed\n"); | |
265 | return NULL; | |
266 | } | |
267 | ||
268 | s = g_malloc0(sizeof(QEMUFileStdio)); | |
269 | ||
270 | s->stdio_file = stdio_file; | |
271 | ||
272 | if(mode[0] == 'r') { | |
273 | s->file = qemu_fopen_ops(s, NULL, stdio_get_buffer, stdio_pclose, | |
274 | NULL, NULL, NULL); | |
275 | } else { | |
276 | s->file = qemu_fopen_ops(s, stdio_put_buffer, NULL, stdio_pclose, | |
277 | NULL, NULL, NULL); | |
278 | } | |
279 | return s->file; | |
280 | } | |
281 | ||
282 | QEMUFile *qemu_popen_cmd(const char *command, const char *mode) | |
283 | { | |
284 | FILE *popen_file; | |
285 | ||
286 | popen_file = popen(command, mode); | |
287 | if(popen_file == NULL) { | |
288 | return NULL; | |
289 | } | |
290 | ||
291 | return qemu_popen(popen_file, mode); | |
292 | } | |
293 | ||
294 | int qemu_stdio_fd(QEMUFile *f) | |
295 | { | |
296 | QEMUFileStdio *p; | |
297 | int fd; | |
298 | ||
299 | p = (QEMUFileStdio *)f->opaque; | |
300 | fd = fileno(p->stdio_file); | |
301 | ||
302 | return fd; | |
303 | } | |
304 | ||
305 | QEMUFile *qemu_fdopen(int fd, const char *mode) | |
306 | { | |
307 | QEMUFileStdio *s; | |
308 | ||
309 | if (mode == NULL || | |
310 | (mode[0] != 'r' && mode[0] != 'w') || | |
311 | mode[1] != 'b' || mode[2] != 0) { | |
312 | fprintf(stderr, "qemu_fdopen: Argument validity check failed\n"); | |
313 | return NULL; | |
314 | } | |
315 | ||
316 | s = g_malloc0(sizeof(QEMUFileStdio)); | |
317 | s->stdio_file = fdopen(fd, mode); | |
318 | if (!s->stdio_file) | |
319 | goto fail; | |
320 | ||
321 | if(mode[0] == 'r') { | |
322 | s->file = qemu_fopen_ops(s, NULL, stdio_get_buffer, stdio_fclose, | |
323 | NULL, NULL, NULL); | |
324 | } else { | |
325 | s->file = qemu_fopen_ops(s, stdio_put_buffer, NULL, stdio_fclose, | |
326 | NULL, NULL, NULL); | |
327 | } | |
328 | return s->file; | |
329 | ||
330 | fail: | |
331 | g_free(s); | |
332 | return NULL; | |
333 | } | |
334 | ||
335 | QEMUFile *qemu_fopen_socket(int fd) | |
336 | { | |
337 | QEMUFileSocket *s = g_malloc0(sizeof(QEMUFileSocket)); | |
338 | ||
339 | s->fd = fd; | |
340 | s->file = qemu_fopen_ops(s, NULL, socket_get_buffer, socket_close, | |
341 | NULL, NULL, NULL); | |
342 | return s->file; | |
343 | } | |
344 | ||
345 | static int file_put_buffer(void *opaque, const uint8_t *buf, | |
346 | int64_t pos, int size) | |
347 | { | |
348 | QEMUFileStdio *s = opaque; | |
349 | fseek(s->stdio_file, pos, SEEK_SET); | |
350 | return fwrite(buf, 1, size, s->stdio_file); | |
351 | } | |
352 | ||
353 | static int file_get_buffer(void *opaque, uint8_t *buf, int64_t pos, int size) | |
354 | { | |
355 | QEMUFileStdio *s = opaque; | |
356 | fseek(s->stdio_file, pos, SEEK_SET); | |
357 | return fread(buf, 1, size, s->stdio_file); | |
358 | } | |
359 | ||
360 | QEMUFile *qemu_fopen(const char *filename, const char *mode) | |
361 | { | |
362 | QEMUFileStdio *s; | |
363 | ||
364 | if (mode == NULL || | |
365 | (mode[0] != 'r' && mode[0] != 'w') || | |
366 | mode[1] != 'b' || mode[2] != 0) { | |
367 | fprintf(stderr, "qemu_fopen: Argument validity check failed\n"); | |
368 | return NULL; | |
369 | } | |
370 | ||
371 | s = g_malloc0(sizeof(QEMUFileStdio)); | |
372 | ||
373 | s->stdio_file = fopen(filename, mode); | |
374 | if (!s->stdio_file) | |
375 | goto fail; | |
376 | ||
377 | if(mode[0] == 'w') { | |
378 | s->file = qemu_fopen_ops(s, file_put_buffer, NULL, stdio_fclose, | |
379 | NULL, NULL, NULL); | |
380 | } else { | |
381 | s->file = qemu_fopen_ops(s, NULL, file_get_buffer, stdio_fclose, | |
382 | NULL, NULL, NULL); | |
383 | } | |
384 | return s->file; | |
385 | fail: | |
386 | g_free(s); | |
387 | return NULL; | |
388 | } | |
389 | ||
390 | static int block_put_buffer(void *opaque, const uint8_t *buf, | |
391 | int64_t pos, int size) | |
392 | { | |
393 | bdrv_save_vmstate(opaque, buf, pos, size); | |
394 | return size; | |
395 | } | |
396 | ||
397 | static int block_get_buffer(void *opaque, uint8_t *buf, int64_t pos, int size) | |
398 | { | |
399 | return bdrv_load_vmstate(opaque, buf, pos, size); | |
400 | } | |
401 | ||
402 | static int bdrv_fclose(void *opaque) | |
403 | { | |
404 | return bdrv_flush(opaque); | |
405 | } | |
406 | ||
407 | static QEMUFile *qemu_fopen_bdrv(BlockDriverState *bs, int is_writable) | |
408 | { | |
409 | if (is_writable) | |
410 | return qemu_fopen_ops(bs, block_put_buffer, NULL, bdrv_fclose, | |
411 | NULL, NULL, NULL); | |
412 | return qemu_fopen_ops(bs, NULL, block_get_buffer, bdrv_fclose, NULL, NULL, NULL); | |
413 | } | |
414 | ||
415 | QEMUFile *qemu_fopen_ops(void *opaque, QEMUFilePutBufferFunc *put_buffer, | |
416 | QEMUFileGetBufferFunc *get_buffer, | |
417 | QEMUFileCloseFunc *close, | |
418 | QEMUFileRateLimit *rate_limit, | |
419 | QEMUFileSetRateLimit *set_rate_limit, | |
420 | QEMUFileGetRateLimit *get_rate_limit) | |
421 | { | |
422 | QEMUFile *f; | |
423 | ||
424 | f = g_malloc0(sizeof(QEMUFile)); | |
425 | ||
426 | f->opaque = opaque; | |
427 | f->put_buffer = put_buffer; | |
428 | f->get_buffer = get_buffer; | |
429 | f->close = close; | |
430 | f->rate_limit = rate_limit; | |
431 | f->set_rate_limit = set_rate_limit; | |
432 | f->get_rate_limit = get_rate_limit; | |
433 | f->is_write = 0; | |
434 | ||
435 | return f; | |
436 | } | |
437 | ||
438 | int qemu_file_get_error(QEMUFile *f) | |
439 | { | |
440 | return f->last_error; | |
441 | } | |
442 | ||
443 | void qemu_file_set_error(QEMUFile *f, int ret) | |
444 | { | |
445 | f->last_error = ret; | |
446 | } | |
447 | ||
448 | /** Sets last_error conditionally | |
449 | * | |
450 | * Sets last_error only if ret is negative _and_ no error | |
451 | * was set before. | |
452 | */ | |
453 | static void qemu_file_set_if_error(QEMUFile *f, int ret) | |
454 | { | |
455 | if (ret < 0 && !f->last_error) { | |
456 | qemu_file_set_error(f, ret); | |
457 | } | |
458 | } | |
459 | ||
460 | /** Flushes QEMUFile buffer | |
461 | * | |
462 | * In case of error, last_error is set. | |
463 | */ | |
464 | void qemu_fflush(QEMUFile *f) | |
465 | { | |
466 | if (!f->put_buffer) | |
467 | return; | |
468 | ||
469 | if (f->is_write && f->buf_index > 0) { | |
470 | int len; | |
471 | ||
472 | len = f->put_buffer(f->opaque, f->buf, f->buf_offset, f->buf_index); | |
473 | if (len > 0) | |
474 | f->buf_offset += f->buf_index; | |
475 | else | |
476 | qemu_file_set_error(f, -EINVAL); | |
477 | f->buf_index = 0; | |
478 | } | |
479 | } | |
480 | ||
481 | static void qemu_fill_buffer(QEMUFile *f) | |
482 | { | |
483 | int len; | |
484 | int pending; | |
485 | ||
486 | if (!f->get_buffer) | |
487 | return; | |
488 | ||
489 | if (f->is_write) | |
490 | abort(); | |
491 | ||
492 | pending = f->buf_size - f->buf_index; | |
493 | if (pending > 0) { | |
494 | memmove(f->buf, f->buf + f->buf_index, pending); | |
495 | } | |
496 | f->buf_index = 0; | |
497 | f->buf_size = pending; | |
498 | ||
499 | len = f->get_buffer(f->opaque, f->buf + pending, f->buf_offset, | |
500 | IO_BUF_SIZE - pending); | |
501 | if (len > 0) { | |
502 | f->buf_size += len; | |
503 | f->buf_offset += len; | |
504 | } else if (len == 0) { | |
505 | f->last_error = -EIO; | |
506 | } else if (len != -EAGAIN) | |
507 | qemu_file_set_error(f, len); | |
508 | } | |
509 | ||
510 | /** Calls close function and set last_error if needed | |
511 | * | |
512 | * Internal function. qemu_fflush() must be called before this. | |
513 | * | |
514 | * Returns f->close() return value, or 0 if close function is not set. | |
515 | */ | |
516 | static int qemu_close(QEMUFile *f) | |
517 | { | |
518 | int ret = 0; | |
519 | if (f->close) { | |
520 | ret = f->close(f->opaque); | |
521 | qemu_file_set_if_error(f, ret); | |
522 | } | |
523 | return ret; | |
524 | } | |
525 | ||
526 | /** Closes the file | |
527 | * | |
528 | * Returns negative error value if any error happened on previous operations or | |
529 | * while closing the file. Returns 0 or positive number on success. | |
530 | * | |
531 | * The meaning of return value on success depends on the specific backend | |
532 | * being used. | |
533 | */ | |
534 | int qemu_fclose(QEMUFile *f) | |
535 | { | |
536 | int ret; | |
537 | qemu_fflush(f); | |
538 | ret = qemu_close(f); | |
539 | /* If any error was spotted before closing, we should report it | |
540 | * instead of the close() return value. | |
541 | */ | |
542 | if (f->last_error) { | |
543 | ret = f->last_error; | |
544 | } | |
545 | g_free(f); | |
546 | return ret; | |
547 | } | |
548 | ||
549 | void qemu_file_put_notify(QEMUFile *f) | |
550 | { | |
551 | f->put_buffer(f->opaque, NULL, 0, 0); | |
552 | } | |
553 | ||
554 | void qemu_put_buffer(QEMUFile *f, const uint8_t *buf, int size) | |
555 | { | |
556 | int l; | |
557 | ||
558 | if (!f->last_error && f->is_write == 0 && f->buf_index > 0) { | |
559 | fprintf(stderr, | |
560 | "Attempted to write to buffer while read buffer is not empty\n"); | |
561 | abort(); | |
562 | } | |
563 | ||
564 | while (!f->last_error && size > 0) { | |
565 | l = IO_BUF_SIZE - f->buf_index; | |
566 | if (l > size) | |
567 | l = size; | |
568 | memcpy(f->buf + f->buf_index, buf, l); | |
569 | f->is_write = 1; | |
570 | f->buf_index += l; | |
571 | buf += l; | |
572 | size -= l; | |
573 | if (f->buf_index >= IO_BUF_SIZE) | |
574 | qemu_fflush(f); | |
575 | } | |
576 | } | |
577 | ||
578 | void qemu_put_byte(QEMUFile *f, int v) | |
579 | { | |
580 | if (!f->last_error && f->is_write == 0 && f->buf_index > 0) { | |
581 | fprintf(stderr, | |
582 | "Attempted to write to buffer while read buffer is not empty\n"); | |
583 | abort(); | |
584 | } | |
585 | ||
586 | f->buf[f->buf_index++] = v; | |
587 | f->is_write = 1; | |
588 | if (f->buf_index >= IO_BUF_SIZE) | |
589 | qemu_fflush(f); | |
590 | } | |
591 | ||
592 | static void qemu_file_skip(QEMUFile *f, int size) | |
593 | { | |
594 | if (f->buf_index + size <= f->buf_size) { | |
595 | f->buf_index += size; | |
596 | } | |
597 | } | |
598 | ||
599 | static int qemu_peek_buffer(QEMUFile *f, uint8_t *buf, int size, size_t offset) | |
600 | { | |
601 | int pending; | |
602 | int index; | |
603 | ||
604 | if (f->is_write) { | |
605 | abort(); | |
606 | } | |
607 | ||
608 | index = f->buf_index + offset; | |
609 | pending = f->buf_size - index; | |
610 | if (pending < size) { | |
611 | qemu_fill_buffer(f); | |
612 | index = f->buf_index + offset; | |
613 | pending = f->buf_size - index; | |
614 | } | |
615 | ||
616 | if (pending <= 0) { | |
617 | return 0; | |
618 | } | |
619 | if (size > pending) { | |
620 | size = pending; | |
621 | } | |
622 | ||
623 | memcpy(buf, f->buf + index, size); | |
624 | return size; | |
625 | } | |
626 | ||
627 | int qemu_get_buffer(QEMUFile *f, uint8_t *buf, int size) | |
628 | { | |
629 | int pending = size; | |
630 | int done = 0; | |
631 | ||
632 | while (pending > 0) { | |
633 | int res; | |
634 | ||
635 | res = qemu_peek_buffer(f, buf, pending, 0); | |
636 | if (res == 0) { | |
637 | return done; | |
638 | } | |
639 | qemu_file_skip(f, res); | |
640 | buf += res; | |
641 | pending -= res; | |
642 | done += res; | |
643 | } | |
644 | return done; | |
645 | } | |
646 | ||
647 | static int qemu_peek_byte(QEMUFile *f, int offset) | |
648 | { | |
649 | int index = f->buf_index + offset; | |
650 | ||
651 | if (f->is_write) { | |
652 | abort(); | |
653 | } | |
654 | ||
655 | if (index >= f->buf_size) { | |
656 | qemu_fill_buffer(f); | |
657 | index = f->buf_index + offset; | |
658 | if (index >= f->buf_size) { | |
659 | return 0; | |
660 | } | |
661 | } | |
662 | return f->buf[index]; | |
663 | } | |
664 | ||
665 | int qemu_get_byte(QEMUFile *f) | |
666 | { | |
667 | int result; | |
668 | ||
669 | result = qemu_peek_byte(f, 0); | |
670 | qemu_file_skip(f, 1); | |
671 | return result; | |
672 | } | |
673 | ||
674 | int64_t qemu_ftell(QEMUFile *f) | |
675 | { | |
676 | return f->buf_offset - f->buf_size + f->buf_index; | |
677 | } | |
678 | ||
679 | int64_t qemu_fseek(QEMUFile *f, int64_t pos, int whence) | |
680 | { | |
681 | if (whence == SEEK_SET) { | |
682 | /* nothing to do */ | |
683 | } else if (whence == SEEK_CUR) { | |
684 | pos += qemu_ftell(f); | |
685 | } else { | |
686 | /* SEEK_END not supported */ | |
687 | return -1; | |
688 | } | |
689 | if (f->put_buffer) { | |
690 | qemu_fflush(f); | |
691 | f->buf_offset = pos; | |
692 | } else { | |
693 | f->buf_offset = pos; | |
694 | f->buf_index = 0; | |
695 | f->buf_size = 0; | |
696 | } | |
697 | return pos; | |
698 | } | |
699 | ||
700 | int qemu_file_rate_limit(QEMUFile *f) | |
701 | { | |
702 | if (f->rate_limit) | |
703 | return f->rate_limit(f->opaque); | |
704 | ||
705 | return 0; | |
706 | } | |
707 | ||
708 | int64_t qemu_file_get_rate_limit(QEMUFile *f) | |
709 | { | |
710 | if (f->get_rate_limit) | |
711 | return f->get_rate_limit(f->opaque); | |
712 | ||
713 | return 0; | |
714 | } | |
715 | ||
716 | int64_t qemu_file_set_rate_limit(QEMUFile *f, int64_t new_rate) | |
717 | { | |
718 | /* any failed or completed migration keeps its state to allow probing of | |
719 | * migration data, but has no associated file anymore */ | |
720 | if (f && f->set_rate_limit) | |
721 | return f->set_rate_limit(f->opaque, new_rate); | |
722 | ||
723 | return 0; | |
724 | } | |
725 | ||
726 | void qemu_put_be16(QEMUFile *f, unsigned int v) | |
727 | { | |
728 | qemu_put_byte(f, v >> 8); | |
729 | qemu_put_byte(f, v); | |
730 | } | |
731 | ||
732 | void qemu_put_be32(QEMUFile *f, unsigned int v) | |
733 | { | |
734 | qemu_put_byte(f, v >> 24); | |
735 | qemu_put_byte(f, v >> 16); | |
736 | qemu_put_byte(f, v >> 8); | |
737 | qemu_put_byte(f, v); | |
738 | } | |
739 | ||
740 | void qemu_put_be64(QEMUFile *f, uint64_t v) | |
741 | { | |
742 | qemu_put_be32(f, v >> 32); | |
743 | qemu_put_be32(f, v); | |
744 | } | |
745 | ||
746 | unsigned int qemu_get_be16(QEMUFile *f) | |
747 | { | |
748 | unsigned int v; | |
749 | v = qemu_get_byte(f) << 8; | |
750 | v |= qemu_get_byte(f); | |
751 | return v; | |
752 | } | |
753 | ||
754 | unsigned int qemu_get_be32(QEMUFile *f) | |
755 | { | |
756 | unsigned int v; | |
757 | v = qemu_get_byte(f) << 24; | |
758 | v |= qemu_get_byte(f) << 16; | |
759 | v |= qemu_get_byte(f) << 8; | |
760 | v |= qemu_get_byte(f); | |
761 | return v; | |
762 | } | |
763 | ||
764 | uint64_t qemu_get_be64(QEMUFile *f) | |
765 | { | |
766 | uint64_t v; | |
767 | v = (uint64_t)qemu_get_be32(f) << 32; | |
768 | v |= qemu_get_be32(f); | |
769 | return v; | |
770 | } | |
771 | ||
772 | ||
773 | /* timer */ | |
774 | ||
775 | void qemu_put_timer(QEMUFile *f, QEMUTimer *ts) | |
776 | { | |
777 | uint64_t expire_time; | |
778 | ||
779 | expire_time = qemu_timer_expire_time_ns(ts); | |
780 | qemu_put_be64(f, expire_time); | |
781 | } | |
782 | ||
783 | void qemu_get_timer(QEMUFile *f, QEMUTimer *ts) | |
784 | { | |
785 | uint64_t expire_time; | |
786 | ||
787 | expire_time = qemu_get_be64(f); | |
788 | if (expire_time != -1) { | |
789 | qemu_mod_timer_ns(ts, expire_time); | |
790 | } else { | |
791 | qemu_del_timer(ts); | |
792 | } | |
793 | } | |
794 | ||
795 | ||
796 | /* bool */ | |
797 | ||
798 | static int get_bool(QEMUFile *f, void *pv, size_t size) | |
799 | { | |
800 | bool *v = pv; | |
801 | *v = qemu_get_byte(f); | |
802 | return 0; | |
803 | } | |
804 | ||
805 | static void put_bool(QEMUFile *f, void *pv, size_t size) | |
806 | { | |
807 | bool *v = pv; | |
808 | qemu_put_byte(f, *v); | |
809 | } | |
810 | ||
811 | const VMStateInfo vmstate_info_bool = { | |
812 | .name = "bool", | |
813 | .get = get_bool, | |
814 | .put = put_bool, | |
815 | }; | |
816 | ||
817 | /* 8 bit int */ | |
818 | ||
819 | static int get_int8(QEMUFile *f, void *pv, size_t size) | |
820 | { | |
821 | int8_t *v = pv; | |
822 | qemu_get_s8s(f, v); | |
823 | return 0; | |
824 | } | |
825 | ||
826 | static void put_int8(QEMUFile *f, void *pv, size_t size) | |
827 | { | |
828 | int8_t *v = pv; | |
829 | qemu_put_s8s(f, v); | |
830 | } | |
831 | ||
832 | const VMStateInfo vmstate_info_int8 = { | |
833 | .name = "int8", | |
834 | .get = get_int8, | |
835 | .put = put_int8, | |
836 | }; | |
837 | ||
838 | /* 16 bit int */ | |
839 | ||
840 | static int get_int16(QEMUFile *f, void *pv, size_t size) | |
841 | { | |
842 | int16_t *v = pv; | |
843 | qemu_get_sbe16s(f, v); | |
844 | return 0; | |
845 | } | |
846 | ||
847 | static void put_int16(QEMUFile *f, void *pv, size_t size) | |
848 | { | |
849 | int16_t *v = pv; | |
850 | qemu_put_sbe16s(f, v); | |
851 | } | |
852 | ||
853 | const VMStateInfo vmstate_info_int16 = { | |
854 | .name = "int16", | |
855 | .get = get_int16, | |
856 | .put = put_int16, | |
857 | }; | |
858 | ||
859 | /* 32 bit int */ | |
860 | ||
861 | static int get_int32(QEMUFile *f, void *pv, size_t size) | |
862 | { | |
863 | int32_t *v = pv; | |
864 | qemu_get_sbe32s(f, v); | |
865 | return 0; | |
866 | } | |
867 | ||
868 | static void put_int32(QEMUFile *f, void *pv, size_t size) | |
869 | { | |
870 | int32_t *v = pv; | |
871 | qemu_put_sbe32s(f, v); | |
872 | } | |
873 | ||
874 | const VMStateInfo vmstate_info_int32 = { | |
875 | .name = "int32", | |
876 | .get = get_int32, | |
877 | .put = put_int32, | |
878 | }; | |
879 | ||
880 | /* 32 bit int. See that the received value is the same than the one | |
881 | in the field */ | |
882 | ||
883 | static int get_int32_equal(QEMUFile *f, void *pv, size_t size) | |
884 | { | |
885 | int32_t *v = pv; | |
886 | int32_t v2; | |
887 | qemu_get_sbe32s(f, &v2); | |
888 | ||
889 | if (*v == v2) | |
890 | return 0; | |
891 | return -EINVAL; | |
892 | } | |
893 | ||
894 | const VMStateInfo vmstate_info_int32_equal = { | |
895 | .name = "int32 equal", | |
896 | .get = get_int32_equal, | |
897 | .put = put_int32, | |
898 | }; | |
899 | ||
900 | /* 32 bit int. See that the received value is the less or the same | |
901 | than the one in the field */ | |
902 | ||
903 | static int get_int32_le(QEMUFile *f, void *pv, size_t size) | |
904 | { | |
905 | int32_t *old = pv; | |
906 | int32_t new; | |
907 | qemu_get_sbe32s(f, &new); | |
908 | ||
909 | if (*old <= new) | |
910 | return 0; | |
911 | return -EINVAL; | |
912 | } | |
913 | ||
914 | const VMStateInfo vmstate_info_int32_le = { | |
915 | .name = "int32 equal", | |
916 | .get = get_int32_le, | |
917 | .put = put_int32, | |
918 | }; | |
919 | ||
920 | /* 64 bit int */ | |
921 | ||
922 | static int get_int64(QEMUFile *f, void *pv, size_t size) | |
923 | { | |
924 | int64_t *v = pv; | |
925 | qemu_get_sbe64s(f, v); | |
926 | return 0; | |
927 | } | |
928 | ||
929 | static void put_int64(QEMUFile *f, void *pv, size_t size) | |
930 | { | |
931 | int64_t *v = pv; | |
932 | qemu_put_sbe64s(f, v); | |
933 | } | |
934 | ||
935 | const VMStateInfo vmstate_info_int64 = { | |
936 | .name = "int64", | |
937 | .get = get_int64, | |
938 | .put = put_int64, | |
939 | }; | |
940 | ||
941 | /* 8 bit unsigned int */ | |
942 | ||
943 | static int get_uint8(QEMUFile *f, void *pv, size_t size) | |
944 | { | |
945 | uint8_t *v = pv; | |
946 | qemu_get_8s(f, v); | |
947 | return 0; | |
948 | } | |
949 | ||
950 | static void put_uint8(QEMUFile *f, void *pv, size_t size) | |
951 | { | |
952 | uint8_t *v = pv; | |
953 | qemu_put_8s(f, v); | |
954 | } | |
955 | ||
956 | const VMStateInfo vmstate_info_uint8 = { | |
957 | .name = "uint8", | |
958 | .get = get_uint8, | |
959 | .put = put_uint8, | |
960 | }; | |
961 | ||
962 | /* 16 bit unsigned int */ | |
963 | ||
964 | static int get_uint16(QEMUFile *f, void *pv, size_t size) | |
965 | { | |
966 | uint16_t *v = pv; | |
967 | qemu_get_be16s(f, v); | |
968 | return 0; | |
969 | } | |
970 | ||
971 | static void put_uint16(QEMUFile *f, void *pv, size_t size) | |
972 | { | |
973 | uint16_t *v = pv; | |
974 | qemu_put_be16s(f, v); | |
975 | } | |
976 | ||
977 | const VMStateInfo vmstate_info_uint16 = { | |
978 | .name = "uint16", | |
979 | .get = get_uint16, | |
980 | .put = put_uint16, | |
981 | }; | |
982 | ||
983 | /* 32 bit unsigned int */ | |
984 | ||
985 | static int get_uint32(QEMUFile *f, void *pv, size_t size) | |
986 | { | |
987 | uint32_t *v = pv; | |
988 | qemu_get_be32s(f, v); | |
989 | return 0; | |
990 | } | |
991 | ||
992 | static void put_uint32(QEMUFile *f, void *pv, size_t size) | |
993 | { | |
994 | uint32_t *v = pv; | |
995 | qemu_put_be32s(f, v); | |
996 | } | |
997 | ||
998 | const VMStateInfo vmstate_info_uint32 = { | |
999 | .name = "uint32", | |
1000 | .get = get_uint32, | |
1001 | .put = put_uint32, | |
1002 | }; | |
1003 | ||
1004 | /* 32 bit uint. See that the received value is the same than the one | |
1005 | in the field */ | |
1006 | ||
1007 | static int get_uint32_equal(QEMUFile *f, void *pv, size_t size) | |
1008 | { | |
1009 | uint32_t *v = pv; | |
1010 | uint32_t v2; | |
1011 | qemu_get_be32s(f, &v2); | |
1012 | ||
1013 | if (*v == v2) { | |
1014 | return 0; | |
1015 | } | |
1016 | return -EINVAL; | |
1017 | } | |
1018 | ||
1019 | const VMStateInfo vmstate_info_uint32_equal = { | |
1020 | .name = "uint32 equal", | |
1021 | .get = get_uint32_equal, | |
1022 | .put = put_uint32, | |
1023 | }; | |
1024 | ||
1025 | /* 64 bit unsigned int */ | |
1026 | ||
1027 | static int get_uint64(QEMUFile *f, void *pv, size_t size) | |
1028 | { | |
1029 | uint64_t *v = pv; | |
1030 | qemu_get_be64s(f, v); | |
1031 | return 0; | |
1032 | } | |
1033 | ||
1034 | static void put_uint64(QEMUFile *f, void *pv, size_t size) | |
1035 | { | |
1036 | uint64_t *v = pv; | |
1037 | qemu_put_be64s(f, v); | |
1038 | } | |
1039 | ||
1040 | const VMStateInfo vmstate_info_uint64 = { | |
1041 | .name = "uint64", | |
1042 | .get = get_uint64, | |
1043 | .put = put_uint64, | |
1044 | }; | |
1045 | ||
1046 | /* 8 bit int. See that the received value is the same than the one | |
1047 | in the field */ | |
1048 | ||
1049 | static int get_uint8_equal(QEMUFile *f, void *pv, size_t size) | |
1050 | { | |
1051 | uint8_t *v = pv; | |
1052 | uint8_t v2; | |
1053 | qemu_get_8s(f, &v2); | |
1054 | ||
1055 | if (*v == v2) | |
1056 | return 0; | |
1057 | return -EINVAL; | |
1058 | } | |
1059 | ||
1060 | const VMStateInfo vmstate_info_uint8_equal = { | |
1061 | .name = "uint8 equal", | |
1062 | .get = get_uint8_equal, | |
1063 | .put = put_uint8, | |
1064 | }; | |
1065 | ||
1066 | /* 16 bit unsigned int int. See that the received value is the same than the one | |
1067 | in the field */ | |
1068 | ||
1069 | static int get_uint16_equal(QEMUFile *f, void *pv, size_t size) | |
1070 | { | |
1071 | uint16_t *v = pv; | |
1072 | uint16_t v2; | |
1073 | qemu_get_be16s(f, &v2); | |
1074 | ||
1075 | if (*v == v2) | |
1076 | return 0; | |
1077 | return -EINVAL; | |
1078 | } | |
1079 | ||
1080 | const VMStateInfo vmstate_info_uint16_equal = { | |
1081 | .name = "uint16 equal", | |
1082 | .get = get_uint16_equal, | |
1083 | .put = put_uint16, | |
1084 | }; | |
1085 | ||
1086 | /* timers */ | |
1087 | ||
1088 | static int get_timer(QEMUFile *f, void *pv, size_t size) | |
1089 | { | |
1090 | QEMUTimer *v = pv; | |
1091 | qemu_get_timer(f, v); | |
1092 | return 0; | |
1093 | } | |
1094 | ||
1095 | static void put_timer(QEMUFile *f, void *pv, size_t size) | |
1096 | { | |
1097 | QEMUTimer *v = pv; | |
1098 | qemu_put_timer(f, v); | |
1099 | } | |
1100 | ||
1101 | const VMStateInfo vmstate_info_timer = { | |
1102 | .name = "timer", | |
1103 | .get = get_timer, | |
1104 | .put = put_timer, | |
1105 | }; | |
1106 | ||
1107 | /* uint8_t buffers */ | |
1108 | ||
1109 | static int get_buffer(QEMUFile *f, void *pv, size_t size) | |
1110 | { | |
1111 | uint8_t *v = pv; | |
1112 | qemu_get_buffer(f, v, size); | |
1113 | return 0; | |
1114 | } | |
1115 | ||
1116 | static void put_buffer(QEMUFile *f, void *pv, size_t size) | |
1117 | { | |
1118 | uint8_t *v = pv; | |
1119 | qemu_put_buffer(f, v, size); | |
1120 | } | |
1121 | ||
1122 | const VMStateInfo vmstate_info_buffer = { | |
1123 | .name = "buffer", | |
1124 | .get = get_buffer, | |
1125 | .put = put_buffer, | |
1126 | }; | |
1127 | ||
1128 | /* unused buffers: space that was used for some fields that are | |
1129 | not useful anymore */ | |
1130 | ||
1131 | static int get_unused_buffer(QEMUFile *f, void *pv, size_t size) | |
1132 | { | |
1133 | uint8_t buf[1024]; | |
1134 | int block_len; | |
1135 | ||
1136 | while (size > 0) { | |
1137 | block_len = MIN(sizeof(buf), size); | |
1138 | size -= block_len; | |
1139 | qemu_get_buffer(f, buf, block_len); | |
1140 | } | |
1141 | return 0; | |
1142 | } | |
1143 | ||
1144 | static void put_unused_buffer(QEMUFile *f, void *pv, size_t size) | |
1145 | { | |
1146 | static const uint8_t buf[1024]; | |
1147 | int block_len; | |
1148 | ||
1149 | while (size > 0) { | |
1150 | block_len = MIN(sizeof(buf), size); | |
1151 | size -= block_len; | |
1152 | qemu_put_buffer(f, buf, block_len); | |
1153 | } | |
1154 | } | |
1155 | ||
1156 | const VMStateInfo vmstate_info_unused_buffer = { | |
1157 | .name = "unused_buffer", | |
1158 | .get = get_unused_buffer, | |
1159 | .put = put_unused_buffer, | |
1160 | }; | |
1161 | ||
1162 | typedef struct CompatEntry { | |
1163 | char idstr[256]; | |
1164 | int instance_id; | |
1165 | } CompatEntry; | |
1166 | ||
1167 | typedef struct SaveStateEntry { | |
1168 | QTAILQ_ENTRY(SaveStateEntry) entry; | |
1169 | char idstr[256]; | |
1170 | int instance_id; | |
1171 | int alias_id; | |
1172 | int version_id; | |
1173 | int section_id; | |
1174 | SaveVMHandlers *ops; | |
1175 | const VMStateDescription *vmsd; | |
1176 | void *opaque; | |
1177 | CompatEntry *compat; | |
1178 | int no_migrate; | |
1179 | int is_ram; | |
1180 | } SaveStateEntry; | |
1181 | ||
1182 | ||
1183 | static QTAILQ_HEAD(savevm_handlers, SaveStateEntry) savevm_handlers = | |
1184 | QTAILQ_HEAD_INITIALIZER(savevm_handlers); | |
1185 | static int global_section_id; | |
1186 | ||
1187 | static int calculate_new_instance_id(const char *idstr) | |
1188 | { | |
1189 | SaveStateEntry *se; | |
1190 | int instance_id = 0; | |
1191 | ||
1192 | QTAILQ_FOREACH(se, &savevm_handlers, entry) { | |
1193 | if (strcmp(idstr, se->idstr) == 0 | |
1194 | && instance_id <= se->instance_id) { | |
1195 | instance_id = se->instance_id + 1; | |
1196 | } | |
1197 | } | |
1198 | return instance_id; | |
1199 | } | |
1200 | ||
1201 | static int calculate_compat_instance_id(const char *idstr) | |
1202 | { | |
1203 | SaveStateEntry *se; | |
1204 | int instance_id = 0; | |
1205 | ||
1206 | QTAILQ_FOREACH(se, &savevm_handlers, entry) { | |
1207 | if (!se->compat) | |
1208 | continue; | |
1209 | ||
1210 | if (strcmp(idstr, se->compat->idstr) == 0 | |
1211 | && instance_id <= se->compat->instance_id) { | |
1212 | instance_id = se->compat->instance_id + 1; | |
1213 | } | |
1214 | } | |
1215 | return instance_id; | |
1216 | } | |
1217 | ||
1218 | /* TODO: Individual devices generally have very little idea about the rest | |
1219 | of the system, so instance_id should be removed/replaced. | |
1220 | Meanwhile pass -1 as instance_id if you do not already have a clearly | |
1221 | distinguishing id for all instances of your device class. */ | |
1222 | int register_savevm_live(DeviceState *dev, | |
1223 | const char *idstr, | |
1224 | int instance_id, | |
1225 | int version_id, | |
1226 | SaveSetParamsHandler *set_params, | |
1227 | SaveLiveStateHandler *save_live_state, | |
1228 | SaveStateHandler *save_state, | |
1229 | LoadStateHandler *load_state, | |
1230 | void *opaque) | |
1231 | { | |
1232 | SaveStateEntry *se; | |
1233 | ||
1234 | se = g_malloc0(sizeof(SaveStateEntry)); | |
1235 | se->version_id = version_id; | |
1236 | se->section_id = global_section_id++; | |
1237 | se->ops = g_malloc0(sizeof(SaveVMHandlers)); | |
1238 | se->ops->set_params = set_params; | |
1239 | se->ops->save_live_state = save_live_state; | |
1240 | se->ops->save_state = save_state; | |
1241 | se->ops->load_state = load_state; | |
1242 | se->opaque = opaque; | |
1243 | se->vmsd = NULL; | |
1244 | se->no_migrate = 0; | |
1245 | /* if this is a live_savem then set is_ram */ | |
1246 | if (save_live_state != NULL) { | |
1247 | se->is_ram = 1; | |
1248 | } | |
1249 | ||
1250 | if (dev) { | |
1251 | char *id = qdev_get_dev_path(dev); | |
1252 | if (id) { | |
1253 | pstrcpy(se->idstr, sizeof(se->idstr), id); | |
1254 | pstrcat(se->idstr, sizeof(se->idstr), "/"); | |
1255 | g_free(id); | |
1256 | ||
1257 | se->compat = g_malloc0(sizeof(CompatEntry)); | |
1258 | pstrcpy(se->compat->idstr, sizeof(se->compat->idstr), idstr); | |
1259 | se->compat->instance_id = instance_id == -1 ? | |
1260 | calculate_compat_instance_id(idstr) : instance_id; | |
1261 | instance_id = -1; | |
1262 | } | |
1263 | } | |
1264 | pstrcat(se->idstr, sizeof(se->idstr), idstr); | |
1265 | ||
1266 | if (instance_id == -1) { | |
1267 | se->instance_id = calculate_new_instance_id(se->idstr); | |
1268 | } else { | |
1269 | se->instance_id = instance_id; | |
1270 | } | |
1271 | assert(!se->compat || se->instance_id == 0); | |
1272 | /* add at the end of list */ | |
1273 | QTAILQ_INSERT_TAIL(&savevm_handlers, se, entry); | |
1274 | return 0; | |
1275 | } | |
1276 | ||
1277 | int register_savevm(DeviceState *dev, | |
1278 | const char *idstr, | |
1279 | int instance_id, | |
1280 | int version_id, | |
1281 | SaveStateHandler *save_state, | |
1282 | LoadStateHandler *load_state, | |
1283 | void *opaque) | |
1284 | { | |
1285 | return register_savevm_live(dev, idstr, instance_id, version_id, | |
1286 | NULL, NULL, save_state, load_state, opaque); | |
1287 | } | |
1288 | ||
1289 | void unregister_savevm(DeviceState *dev, const char *idstr, void *opaque) | |
1290 | { | |
1291 | SaveStateEntry *se, *new_se; | |
1292 | char id[256] = ""; | |
1293 | ||
1294 | if (dev) { | |
1295 | char *path = qdev_get_dev_path(dev); | |
1296 | if (path) { | |
1297 | pstrcpy(id, sizeof(id), path); | |
1298 | pstrcat(id, sizeof(id), "/"); | |
1299 | g_free(path); | |
1300 | } | |
1301 | } | |
1302 | pstrcat(id, sizeof(id), idstr); | |
1303 | ||
1304 | QTAILQ_FOREACH_SAFE(se, &savevm_handlers, entry, new_se) { | |
1305 | if (strcmp(se->idstr, id) == 0 && se->opaque == opaque) { | |
1306 | QTAILQ_REMOVE(&savevm_handlers, se, entry); | |
1307 | if (se->compat) { | |
1308 | g_free(se->compat); | |
1309 | } | |
1310 | g_free(se->ops); | |
1311 | g_free(se); | |
1312 | } | |
1313 | } | |
1314 | } | |
1315 | ||
1316 | int vmstate_register_with_alias_id(DeviceState *dev, int instance_id, | |
1317 | const VMStateDescription *vmsd, | |
1318 | void *opaque, int alias_id, | |
1319 | int required_for_version) | |
1320 | { | |
1321 | SaveStateEntry *se; | |
1322 | ||
1323 | /* If this triggers, alias support can be dropped for the vmsd. */ | |
1324 | assert(alias_id == -1 || required_for_version >= vmsd->minimum_version_id); | |
1325 | ||
1326 | se = g_malloc0(sizeof(SaveStateEntry)); | |
1327 | se->version_id = vmsd->version_id; | |
1328 | se->section_id = global_section_id++; | |
1329 | se->opaque = opaque; | |
1330 | se->vmsd = vmsd; | |
1331 | se->alias_id = alias_id; | |
1332 | se->no_migrate = vmsd->unmigratable; | |
1333 | ||
1334 | if (dev) { | |
1335 | char *id = qdev_get_dev_path(dev); | |
1336 | if (id) { | |
1337 | pstrcpy(se->idstr, sizeof(se->idstr), id); | |
1338 | pstrcat(se->idstr, sizeof(se->idstr), "/"); | |
1339 | g_free(id); | |
1340 | ||
1341 | se->compat = g_malloc0(sizeof(CompatEntry)); | |
1342 | pstrcpy(se->compat->idstr, sizeof(se->compat->idstr), vmsd->name); | |
1343 | se->compat->instance_id = instance_id == -1 ? | |
1344 | calculate_compat_instance_id(vmsd->name) : instance_id; | |
1345 | instance_id = -1; | |
1346 | } | |
1347 | } | |
1348 | pstrcat(se->idstr, sizeof(se->idstr), vmsd->name); | |
1349 | ||
1350 | if (instance_id == -1) { | |
1351 | se->instance_id = calculate_new_instance_id(se->idstr); | |
1352 | } else { | |
1353 | se->instance_id = instance_id; | |
1354 | } | |
1355 | assert(!se->compat || se->instance_id == 0); | |
1356 | /* add at the end of list */ | |
1357 | QTAILQ_INSERT_TAIL(&savevm_handlers, se, entry); | |
1358 | return 0; | |
1359 | } | |
1360 | ||
1361 | int vmstate_register(DeviceState *dev, int instance_id, | |
1362 | const VMStateDescription *vmsd, void *opaque) | |
1363 | { | |
1364 | return vmstate_register_with_alias_id(dev, instance_id, vmsd, | |
1365 | opaque, -1, 0); | |
1366 | } | |
1367 | ||
1368 | void vmstate_unregister(DeviceState *dev, const VMStateDescription *vmsd, | |
1369 | void *opaque) | |
1370 | { | |
1371 | SaveStateEntry *se, *new_se; | |
1372 | ||
1373 | QTAILQ_FOREACH_SAFE(se, &savevm_handlers, entry, new_se) { | |
1374 | if (se->vmsd == vmsd && se->opaque == opaque) { | |
1375 | QTAILQ_REMOVE(&savevm_handlers, se, entry); | |
1376 | if (se->compat) { | |
1377 | g_free(se->compat); | |
1378 | } | |
1379 | g_free(se); | |
1380 | } | |
1381 | } | |
1382 | } | |
1383 | ||
1384 | static void vmstate_subsection_save(QEMUFile *f, const VMStateDescription *vmsd, | |
1385 | void *opaque); | |
1386 | static int vmstate_subsection_load(QEMUFile *f, const VMStateDescription *vmsd, | |
1387 | void *opaque); | |
1388 | ||
1389 | int vmstate_load_state(QEMUFile *f, const VMStateDescription *vmsd, | |
1390 | void *opaque, int version_id) | |
1391 | { | |
1392 | VMStateField *field = vmsd->fields; | |
1393 | int ret; | |
1394 | ||
1395 | if (version_id > vmsd->version_id) { | |
1396 | return -EINVAL; | |
1397 | } | |
1398 | if (version_id < vmsd->minimum_version_id_old) { | |
1399 | return -EINVAL; | |
1400 | } | |
1401 | if (version_id < vmsd->minimum_version_id) { | |
1402 | return vmsd->load_state_old(f, opaque, version_id); | |
1403 | } | |
1404 | if (vmsd->pre_load) { | |
1405 | int ret = vmsd->pre_load(opaque); | |
1406 | if (ret) | |
1407 | return ret; | |
1408 | } | |
1409 | while(field->name) { | |
1410 | if ((field->field_exists && | |
1411 | field->field_exists(opaque, version_id)) || | |
1412 | (!field->field_exists && | |
1413 | field->version_id <= version_id)) { | |
1414 | void *base_addr = opaque + field->offset; | |
1415 | int i, n_elems = 1; | |
1416 | int size = field->size; | |
1417 | ||
1418 | if (field->flags & VMS_VBUFFER) { | |
1419 | size = *(int32_t *)(opaque+field->size_offset); | |
1420 | if (field->flags & VMS_MULTIPLY) { | |
1421 | size *= field->size; | |
1422 | } | |
1423 | } | |
1424 | if (field->flags & VMS_ARRAY) { | |
1425 | n_elems = field->num; | |
1426 | } else if (field->flags & VMS_VARRAY_INT32) { | |
1427 | n_elems = *(int32_t *)(opaque+field->num_offset); | |
1428 | } else if (field->flags & VMS_VARRAY_UINT32) { | |
1429 | n_elems = *(uint32_t *)(opaque+field->num_offset); | |
1430 | } else if (field->flags & VMS_VARRAY_UINT16) { | |
1431 | n_elems = *(uint16_t *)(opaque+field->num_offset); | |
1432 | } else if (field->flags & VMS_VARRAY_UINT8) { | |
1433 | n_elems = *(uint8_t *)(opaque+field->num_offset); | |
1434 | } | |
1435 | if (field->flags & VMS_POINTER) { | |
1436 | base_addr = *(void **)base_addr + field->start; | |
1437 | } | |
1438 | for (i = 0; i < n_elems; i++) { | |
1439 | void *addr = base_addr + size * i; | |
1440 | ||
1441 | if (field->flags & VMS_ARRAY_OF_POINTER) { | |
1442 | addr = *(void **)addr; | |
1443 | } | |
1444 | if (field->flags & VMS_STRUCT) { | |
1445 | ret = vmstate_load_state(f, field->vmsd, addr, field->vmsd->version_id); | |
1446 | } else { | |
1447 | ret = field->info->get(f, addr, size); | |
1448 | ||
1449 | } | |
1450 | if (ret < 0) { | |
1451 | return ret; | |
1452 | } | |
1453 | } | |
1454 | } | |
1455 | field++; | |
1456 | } | |
1457 | ret = vmstate_subsection_load(f, vmsd, opaque); | |
1458 | if (ret != 0) { | |
1459 | return ret; | |
1460 | } | |
1461 | if (vmsd->post_load) { | |
1462 | return vmsd->post_load(opaque, version_id); | |
1463 | } | |
1464 | return 0; | |
1465 | } | |
1466 | ||
1467 | void vmstate_save_state(QEMUFile *f, const VMStateDescription *vmsd, | |
1468 | void *opaque) | |
1469 | { | |
1470 | VMStateField *field = vmsd->fields; | |
1471 | ||
1472 | if (vmsd->pre_save) { | |
1473 | vmsd->pre_save(opaque); | |
1474 | } | |
1475 | while(field->name) { | |
1476 | if (!field->field_exists || | |
1477 | field->field_exists(opaque, vmsd->version_id)) { | |
1478 | void *base_addr = opaque + field->offset; | |
1479 | int i, n_elems = 1; | |
1480 | int size = field->size; | |
1481 | ||
1482 | if (field->flags & VMS_VBUFFER) { | |
1483 | size = *(int32_t *)(opaque+field->size_offset); | |
1484 | if (field->flags & VMS_MULTIPLY) { | |
1485 | size *= field->size; | |
1486 | } | |
1487 | } | |
1488 | if (field->flags & VMS_ARRAY) { | |
1489 | n_elems = field->num; | |
1490 | } else if (field->flags & VMS_VARRAY_INT32) { | |
1491 | n_elems = *(int32_t *)(opaque+field->num_offset); | |
1492 | } else if (field->flags & VMS_VARRAY_UINT32) { | |
1493 | n_elems = *(uint32_t *)(opaque+field->num_offset); | |
1494 | } else if (field->flags & VMS_VARRAY_UINT16) { | |
1495 | n_elems = *(uint16_t *)(opaque+field->num_offset); | |
1496 | } else if (field->flags & VMS_VARRAY_UINT8) { | |
1497 | n_elems = *(uint8_t *)(opaque+field->num_offset); | |
1498 | } | |
1499 | if (field->flags & VMS_POINTER) { | |
1500 | base_addr = *(void **)base_addr + field->start; | |
1501 | } | |
1502 | for (i = 0; i < n_elems; i++) { | |
1503 | void *addr = base_addr + size * i; | |
1504 | ||
1505 | if (field->flags & VMS_ARRAY_OF_POINTER) { | |
1506 | addr = *(void **)addr; | |
1507 | } | |
1508 | if (field->flags & VMS_STRUCT) { | |
1509 | vmstate_save_state(f, field->vmsd, addr); | |
1510 | } else { | |
1511 | field->info->put(f, addr, size); | |
1512 | } | |
1513 | } | |
1514 | } | |
1515 | field++; | |
1516 | } | |
1517 | vmstate_subsection_save(f, vmsd, opaque); | |
1518 | } | |
1519 | ||
1520 | static int vmstate_load(QEMUFile *f, SaveStateEntry *se, int version_id) | |
1521 | { | |
1522 | if (!se->vmsd) { /* Old style */ | |
1523 | return se->ops->load_state(f, se->opaque, version_id); | |
1524 | } | |
1525 | return vmstate_load_state(f, se->vmsd, se->opaque, version_id); | |
1526 | } | |
1527 | ||
1528 | static void vmstate_save(QEMUFile *f, SaveStateEntry *se) | |
1529 | { | |
1530 | if (!se->vmsd) { /* Old style */ | |
1531 | se->ops->save_state(f, se->opaque); | |
1532 | return; | |
1533 | } | |
1534 | vmstate_save_state(f,se->vmsd, se->opaque); | |
1535 | } | |
1536 | ||
1537 | #define QEMU_VM_FILE_MAGIC 0x5145564d | |
1538 | #define QEMU_VM_FILE_VERSION_COMPAT 0x00000002 | |
1539 | #define QEMU_VM_FILE_VERSION 0x00000003 | |
1540 | ||
1541 | #define QEMU_VM_EOF 0x00 | |
1542 | #define QEMU_VM_SECTION_START 0x01 | |
1543 | #define QEMU_VM_SECTION_PART 0x02 | |
1544 | #define QEMU_VM_SECTION_END 0x03 | |
1545 | #define QEMU_VM_SECTION_FULL 0x04 | |
1546 | #define QEMU_VM_SUBSECTION 0x05 | |
1547 | ||
1548 | bool qemu_savevm_state_blocked(Error **errp) | |
1549 | { | |
1550 | SaveStateEntry *se; | |
1551 | ||
1552 | QTAILQ_FOREACH(se, &savevm_handlers, entry) { | |
1553 | if (se->no_migrate) { | |
1554 | error_set(errp, QERR_MIGRATION_NOT_SUPPORTED, se->idstr); | |
1555 | return true; | |
1556 | } | |
1557 | } | |
1558 | return false; | |
1559 | } | |
1560 | ||
1561 | int qemu_savevm_state_begin(QEMUFile *f, | |
1562 | const MigrationParams *params) | |
1563 | { | |
1564 | SaveStateEntry *se; | |
1565 | int ret; | |
1566 | ||
1567 | QTAILQ_FOREACH(se, &savevm_handlers, entry) { | |
1568 | if (!se->ops || !se->ops->set_params) { | |
1569 | continue; | |
1570 | } | |
1571 | se->ops->set_params(params, se->opaque); | |
1572 | } | |
1573 | ||
1574 | qemu_put_be32(f, QEMU_VM_FILE_MAGIC); | |
1575 | qemu_put_be32(f, QEMU_VM_FILE_VERSION); | |
1576 | ||
1577 | QTAILQ_FOREACH(se, &savevm_handlers, entry) { | |
1578 | int len; | |
1579 | ||
1580 | if (!se->ops || !se->ops->save_live_state) { | |
1581 | continue; | |
1582 | } | |
1583 | /* Section type */ | |
1584 | qemu_put_byte(f, QEMU_VM_SECTION_START); | |
1585 | qemu_put_be32(f, se->section_id); | |
1586 | ||
1587 | /* ID string */ | |
1588 | len = strlen(se->idstr); | |
1589 | qemu_put_byte(f, len); | |
1590 | qemu_put_buffer(f, (uint8_t *)se->idstr, len); | |
1591 | ||
1592 | qemu_put_be32(f, se->instance_id); | |
1593 | qemu_put_be32(f, se->version_id); | |
1594 | ||
1595 | ret = se->ops->save_live_state(f, QEMU_VM_SECTION_START, se->opaque); | |
1596 | if (ret < 0) { | |
1597 | qemu_savevm_state_cancel(f); | |
1598 | return ret; | |
1599 | } | |
1600 | } | |
1601 | ret = qemu_file_get_error(f); | |
1602 | if (ret != 0) { | |
1603 | qemu_savevm_state_cancel(f); | |
1604 | } | |
1605 | ||
1606 | return ret; | |
1607 | ||
1608 | } | |
1609 | ||
1610 | /* | |
1611 | * this function has three return values: | |
1612 | * negative: there was one error, and we have -errno. | |
1613 | * 0 : We haven't finished, caller have to go again | |
1614 | * 1 : We have finished, we can go to complete phase | |
1615 | */ | |
1616 | int qemu_savevm_state_iterate(QEMUFile *f) | |
1617 | { | |
1618 | SaveStateEntry *se; | |
1619 | int ret = 1; | |
1620 | ||
1621 | QTAILQ_FOREACH(se, &savevm_handlers, entry) { | |
1622 | if (!se->ops || !se->ops->save_live_state) { | |
1623 | continue; | |
1624 | } | |
1625 | if (qemu_file_rate_limit(f)) { | |
1626 | return 0; | |
1627 | } | |
1628 | trace_savevm_section_start(); | |
1629 | /* Section type */ | |
1630 | qemu_put_byte(f, QEMU_VM_SECTION_PART); | |
1631 | qemu_put_be32(f, se->section_id); | |
1632 | ||
1633 | ret = se->ops->save_live_state(f, QEMU_VM_SECTION_PART, se->opaque); | |
1634 | trace_savevm_section_end(se->section_id); | |
1635 | ||
1636 | if (ret <= 0) { | |
1637 | /* Do not proceed to the next vmstate before this one reported | |
1638 | completion of the current stage. This serializes the migration | |
1639 | and reduces the probability that a faster changing state is | |
1640 | synchronized over and over again. */ | |
1641 | break; | |
1642 | } | |
1643 | } | |
1644 | if (ret != 0) { | |
1645 | return ret; | |
1646 | } | |
1647 | ret = qemu_file_get_error(f); | |
1648 | if (ret != 0) { | |
1649 | qemu_savevm_state_cancel(f); | |
1650 | } | |
1651 | return ret; | |
1652 | } | |
1653 | ||
1654 | int qemu_savevm_state_complete(QEMUFile *f) | |
1655 | { | |
1656 | SaveStateEntry *se; | |
1657 | int ret; | |
1658 | ||
1659 | cpu_synchronize_all_states(); | |
1660 | ||
1661 | QTAILQ_FOREACH(se, &savevm_handlers, entry) { | |
1662 | if (!se->ops || !se->ops->save_live_state) { | |
1663 | continue; | |
1664 | } | |
1665 | trace_savevm_section_start(); | |
1666 | /* Section type */ | |
1667 | qemu_put_byte(f, QEMU_VM_SECTION_END); | |
1668 | qemu_put_be32(f, se->section_id); | |
1669 | ||
1670 | ret = se->ops->save_live_state(f, QEMU_VM_SECTION_END, se->opaque); | |
1671 | trace_savevm_section_end(se->section_id); | |
1672 | if (ret < 0) { | |
1673 | return ret; | |
1674 | } | |
1675 | } | |
1676 | ||
1677 | QTAILQ_FOREACH(se, &savevm_handlers, entry) { | |
1678 | int len; | |
1679 | ||
1680 | if ((!se->ops || !se->ops->save_state) && !se->vmsd) { | |
1681 | continue; | |
1682 | } | |
1683 | trace_savevm_section_start(); | |
1684 | /* Section type */ | |
1685 | qemu_put_byte(f, QEMU_VM_SECTION_FULL); | |
1686 | qemu_put_be32(f, se->section_id); | |
1687 | ||
1688 | /* ID string */ | |
1689 | len = strlen(se->idstr); | |
1690 | qemu_put_byte(f, len); | |
1691 | qemu_put_buffer(f, (uint8_t *)se->idstr, len); | |
1692 | ||
1693 | qemu_put_be32(f, se->instance_id); | |
1694 | qemu_put_be32(f, se->version_id); | |
1695 | ||
1696 | vmstate_save(f, se); | |
1697 | trace_savevm_section_end(se->section_id); | |
1698 | } | |
1699 | ||
1700 | qemu_put_byte(f, QEMU_VM_EOF); | |
1701 | ||
1702 | return qemu_file_get_error(f); | |
1703 | } | |
1704 | ||
1705 | void qemu_savevm_state_cancel(QEMUFile *f) | |
1706 | { | |
1707 | SaveStateEntry *se; | |
1708 | ||
1709 | QTAILQ_FOREACH(se, &savevm_handlers, entry) { | |
1710 | if (se->ops && se->ops->save_live_state) { | |
1711 | se->ops->save_live_state(f, -1, se->opaque); | |
1712 | } | |
1713 | } | |
1714 | } | |
1715 | ||
1716 | static int qemu_savevm_state(QEMUFile *f) | |
1717 | { | |
1718 | int ret; | |
1719 | MigrationParams params = { | |
1720 | .blk = 0, | |
1721 | .shared = 0 | |
1722 | }; | |
1723 | ||
1724 | if (qemu_savevm_state_blocked(NULL)) { | |
1725 | ret = -EINVAL; | |
1726 | goto out; | |
1727 | } | |
1728 | ||
1729 | ret = qemu_savevm_state_begin(f, ¶ms); | |
1730 | if (ret < 0) | |
1731 | goto out; | |
1732 | ||
1733 | do { | |
1734 | ret = qemu_savevm_state_iterate(f); | |
1735 | if (ret < 0) | |
1736 | goto out; | |
1737 | } while (ret == 0); | |
1738 | ||
1739 | ret = qemu_savevm_state_complete(f); | |
1740 | ||
1741 | out: | |
1742 | if (ret == 0) { | |
1743 | ret = qemu_file_get_error(f); | |
1744 | } | |
1745 | ||
1746 | return ret; | |
1747 | } | |
1748 | ||
1749 | static int qemu_save_device_state(QEMUFile *f) | |
1750 | { | |
1751 | SaveStateEntry *se; | |
1752 | ||
1753 | qemu_put_be32(f, QEMU_VM_FILE_MAGIC); | |
1754 | qemu_put_be32(f, QEMU_VM_FILE_VERSION); | |
1755 | ||
1756 | cpu_synchronize_all_states(); | |
1757 | ||
1758 | QTAILQ_FOREACH(se, &savevm_handlers, entry) { | |
1759 | int len; | |
1760 | ||
1761 | if (se->is_ram) { | |
1762 | continue; | |
1763 | } | |
1764 | if ((!se->ops || !se->ops->save_state) && !se->vmsd) { | |
1765 | continue; | |
1766 | } | |
1767 | ||
1768 | /* Section type */ | |
1769 | qemu_put_byte(f, QEMU_VM_SECTION_FULL); | |
1770 | qemu_put_be32(f, se->section_id); | |
1771 | ||
1772 | /* ID string */ | |
1773 | len = strlen(se->idstr); | |
1774 | qemu_put_byte(f, len); | |
1775 | qemu_put_buffer(f, (uint8_t *)se->idstr, len); | |
1776 | ||
1777 | qemu_put_be32(f, se->instance_id); | |
1778 | qemu_put_be32(f, se->version_id); | |
1779 | ||
1780 | vmstate_save(f, se); | |
1781 | } | |
1782 | ||
1783 | qemu_put_byte(f, QEMU_VM_EOF); | |
1784 | ||
1785 | return qemu_file_get_error(f); | |
1786 | } | |
1787 | ||
1788 | static SaveStateEntry *find_se(const char *idstr, int instance_id) | |
1789 | { | |
1790 | SaveStateEntry *se; | |
1791 | ||
1792 | QTAILQ_FOREACH(se, &savevm_handlers, entry) { | |
1793 | if (!strcmp(se->idstr, idstr) && | |
1794 | (instance_id == se->instance_id || | |
1795 | instance_id == se->alias_id)) | |
1796 | return se; | |
1797 | /* Migrating from an older version? */ | |
1798 | if (strstr(se->idstr, idstr) && se->compat) { | |
1799 | if (!strcmp(se->compat->idstr, idstr) && | |
1800 | (instance_id == se->compat->instance_id || | |
1801 | instance_id == se->alias_id)) | |
1802 | return se; | |
1803 | } | |
1804 | } | |
1805 | return NULL; | |
1806 | } | |
1807 | ||
1808 | static const VMStateDescription *vmstate_get_subsection(const VMStateSubsection *sub, char *idstr) | |
1809 | { | |
1810 | while(sub && sub->needed) { | |
1811 | if (strcmp(idstr, sub->vmsd->name) == 0) { | |
1812 | return sub->vmsd; | |
1813 | } | |
1814 | sub++; | |
1815 | } | |
1816 | return NULL; | |
1817 | } | |
1818 | ||
1819 | static int vmstate_subsection_load(QEMUFile *f, const VMStateDescription *vmsd, | |
1820 | void *opaque) | |
1821 | { | |
1822 | while (qemu_peek_byte(f, 0) == QEMU_VM_SUBSECTION) { | |
1823 | char idstr[256]; | |
1824 | int ret; | |
1825 | uint8_t version_id, len, size; | |
1826 | const VMStateDescription *sub_vmsd; | |
1827 | ||
1828 | len = qemu_peek_byte(f, 1); | |
1829 | if (len < strlen(vmsd->name) + 1) { | |
1830 | /* subsection name has be be "section_name/a" */ | |
1831 | return 0; | |
1832 | } | |
1833 | size = qemu_peek_buffer(f, (uint8_t *)idstr, len, 2); | |
1834 | if (size != len) { | |
1835 | return 0; | |
1836 | } | |
1837 | idstr[size] = 0; | |
1838 | ||
1839 | if (strncmp(vmsd->name, idstr, strlen(vmsd->name)) != 0) { | |
1840 | /* it don't have a valid subsection name */ | |
1841 | return 0; | |
1842 | } | |
1843 | sub_vmsd = vmstate_get_subsection(vmsd->subsections, idstr); | |
1844 | if (sub_vmsd == NULL) { | |
1845 | return -ENOENT; | |
1846 | } | |
1847 | qemu_file_skip(f, 1); /* subsection */ | |
1848 | qemu_file_skip(f, 1); /* len */ | |
1849 | qemu_file_skip(f, len); /* idstr */ | |
1850 | version_id = qemu_get_be32(f); | |
1851 | ||
1852 | ret = vmstate_load_state(f, sub_vmsd, opaque, version_id); | |
1853 | if (ret) { | |
1854 | return ret; | |
1855 | } | |
1856 | } | |
1857 | return 0; | |
1858 | } | |
1859 | ||
1860 | static void vmstate_subsection_save(QEMUFile *f, const VMStateDescription *vmsd, | |
1861 | void *opaque) | |
1862 | { | |
1863 | const VMStateSubsection *sub = vmsd->subsections; | |
1864 | ||
1865 | while (sub && sub->needed) { | |
1866 | if (sub->needed(opaque)) { | |
1867 | const VMStateDescription *vmsd = sub->vmsd; | |
1868 | uint8_t len; | |
1869 | ||
1870 | qemu_put_byte(f, QEMU_VM_SUBSECTION); | |
1871 | len = strlen(vmsd->name); | |
1872 | qemu_put_byte(f, len); | |
1873 | qemu_put_buffer(f, (uint8_t *)vmsd->name, len); | |
1874 | qemu_put_be32(f, vmsd->version_id); | |
1875 | vmstate_save_state(f, vmsd, opaque); | |
1876 | } | |
1877 | sub++; | |
1878 | } | |
1879 | } | |
1880 | ||
1881 | typedef struct LoadStateEntry { | |
1882 | QLIST_ENTRY(LoadStateEntry) entry; | |
1883 | SaveStateEntry *se; | |
1884 | int section_id; | |
1885 | int version_id; | |
1886 | } LoadStateEntry; | |
1887 | ||
1888 | int qemu_loadvm_state(QEMUFile *f) | |
1889 | { | |
1890 | QLIST_HEAD(, LoadStateEntry) loadvm_handlers = | |
1891 | QLIST_HEAD_INITIALIZER(loadvm_handlers); | |
1892 | LoadStateEntry *le, *new_le; | |
1893 | uint8_t section_type; | |
1894 | unsigned int v; | |
1895 | int ret; | |
1896 | ||
1897 | if (qemu_savevm_state_blocked(NULL)) { | |
1898 | return -EINVAL; | |
1899 | } | |
1900 | ||
1901 | v = qemu_get_be32(f); | |
1902 | if (v != QEMU_VM_FILE_MAGIC) | |
1903 | return -EINVAL; | |
1904 | ||
1905 | v = qemu_get_be32(f); | |
1906 | if (v == QEMU_VM_FILE_VERSION_COMPAT) { | |
1907 | fprintf(stderr, "SaveVM v2 format is obsolete and don't work anymore\n"); | |
1908 | return -ENOTSUP; | |
1909 | } | |
1910 | if (v != QEMU_VM_FILE_VERSION) | |
1911 | return -ENOTSUP; | |
1912 | ||
1913 | while ((section_type = qemu_get_byte(f)) != QEMU_VM_EOF) { | |
1914 | uint32_t instance_id, version_id, section_id; | |
1915 | SaveStateEntry *se; | |
1916 | char idstr[257]; | |
1917 | int len; | |
1918 | ||
1919 | switch (section_type) { | |
1920 | case QEMU_VM_SECTION_START: | |
1921 | case QEMU_VM_SECTION_FULL: | |
1922 | /* Read section start */ | |
1923 | section_id = qemu_get_be32(f); | |
1924 | len = qemu_get_byte(f); | |
1925 | qemu_get_buffer(f, (uint8_t *)idstr, len); | |
1926 | idstr[len] = 0; | |
1927 | instance_id = qemu_get_be32(f); | |
1928 | version_id = qemu_get_be32(f); | |
1929 | ||
1930 | /* Find savevm section */ | |
1931 | se = find_se(idstr, instance_id); | |
1932 | if (se == NULL) { | |
1933 | fprintf(stderr, "Unknown savevm section or instance '%s' %d\n", idstr, instance_id); | |
1934 | ret = -EINVAL; | |
1935 | goto out; | |
1936 | } | |
1937 | ||
1938 | /* Validate version */ | |
1939 | if (version_id > se->version_id) { | |
1940 | fprintf(stderr, "savevm: unsupported version %d for '%s' v%d\n", | |
1941 | version_id, idstr, se->version_id); | |
1942 | ret = -EINVAL; | |
1943 | goto out; | |
1944 | } | |
1945 | ||
1946 | /* Add entry */ | |
1947 | le = g_malloc0(sizeof(*le)); | |
1948 | ||
1949 | le->se = se; | |
1950 | le->section_id = section_id; | |
1951 | le->version_id = version_id; | |
1952 | QLIST_INSERT_HEAD(&loadvm_handlers, le, entry); | |
1953 | ||
1954 | ret = vmstate_load(f, le->se, le->version_id); | |
1955 | if (ret < 0) { | |
1956 | fprintf(stderr, "qemu: warning: error while loading state for instance 0x%x of device '%s'\n", | |
1957 | instance_id, idstr); | |
1958 | goto out; | |
1959 | } | |
1960 | break; | |
1961 | case QEMU_VM_SECTION_PART: | |
1962 | case QEMU_VM_SECTION_END: | |
1963 | section_id = qemu_get_be32(f); | |
1964 | ||
1965 | QLIST_FOREACH(le, &loadvm_handlers, entry) { | |
1966 | if (le->section_id == section_id) { | |
1967 | break; | |
1968 | } | |
1969 | } | |
1970 | if (le == NULL) { | |
1971 | fprintf(stderr, "Unknown savevm section %d\n", section_id); | |
1972 | ret = -EINVAL; | |
1973 | goto out; | |
1974 | } | |
1975 | ||
1976 | ret = vmstate_load(f, le->se, le->version_id); | |
1977 | if (ret < 0) { | |
1978 | fprintf(stderr, "qemu: warning: error while loading state section id %d\n", | |
1979 | section_id); | |
1980 | goto out; | |
1981 | } | |
1982 | break; | |
1983 | default: | |
1984 | fprintf(stderr, "Unknown savevm section type %d\n", section_type); | |
1985 | ret = -EINVAL; | |
1986 | goto out; | |
1987 | } | |
1988 | } | |
1989 | ||
1990 | cpu_synchronize_all_post_init(); | |
1991 | ||
1992 | ret = 0; | |
1993 | ||
1994 | out: | |
1995 | QLIST_FOREACH_SAFE(le, &loadvm_handlers, entry, new_le) { | |
1996 | QLIST_REMOVE(le, entry); | |
1997 | g_free(le); | |
1998 | } | |
1999 | ||
2000 | if (ret == 0) { | |
2001 | ret = qemu_file_get_error(f); | |
2002 | } | |
2003 | ||
2004 | return ret; | |
2005 | } | |
2006 | ||
2007 | static int bdrv_snapshot_find(BlockDriverState *bs, QEMUSnapshotInfo *sn_info, | |
2008 | const char *name) | |
2009 | { | |
2010 | QEMUSnapshotInfo *sn_tab, *sn; | |
2011 | int nb_sns, i, ret; | |
2012 | ||
2013 | ret = -ENOENT; | |
2014 | nb_sns = bdrv_snapshot_list(bs, &sn_tab); | |
2015 | if (nb_sns < 0) | |
2016 | return ret; | |
2017 | for(i = 0; i < nb_sns; i++) { | |
2018 | sn = &sn_tab[i]; | |
2019 | if (!strcmp(sn->id_str, name) || !strcmp(sn->name, name)) { | |
2020 | *sn_info = *sn; | |
2021 | ret = 0; | |
2022 | break; | |
2023 | } | |
2024 | } | |
2025 | g_free(sn_tab); | |
2026 | return ret; | |
2027 | } | |
2028 | ||
2029 | /* | |
2030 | * Deletes snapshots of a given name in all opened images. | |
2031 | */ | |
2032 | static int del_existing_snapshots(Monitor *mon, const char *name) | |
2033 | { | |
2034 | BlockDriverState *bs; | |
2035 | QEMUSnapshotInfo sn1, *snapshot = &sn1; | |
2036 | int ret; | |
2037 | ||
2038 | bs = NULL; | |
2039 | while ((bs = bdrv_next(bs))) { | |
2040 | if (bdrv_can_snapshot(bs) && | |
2041 | bdrv_snapshot_find(bs, snapshot, name) >= 0) | |
2042 | { | |
2043 | ret = bdrv_snapshot_delete(bs, name); | |
2044 | if (ret < 0) { | |
2045 | monitor_printf(mon, | |
2046 | "Error while deleting snapshot on '%s'\n", | |
2047 | bdrv_get_device_name(bs)); | |
2048 | return -1; | |
2049 | } | |
2050 | } | |
2051 | } | |
2052 | ||
2053 | return 0; | |
2054 | } | |
2055 | ||
2056 | void do_savevm(Monitor *mon, const QDict *qdict) | |
2057 | { | |
2058 | BlockDriverState *bs, *bs1; | |
2059 | QEMUSnapshotInfo sn1, *sn = &sn1, old_sn1, *old_sn = &old_sn1; | |
2060 | int ret; | |
2061 | QEMUFile *f; | |
2062 | int saved_vm_running; | |
2063 | uint64_t vm_state_size; | |
2064 | #ifdef _WIN32 | |
2065 | struct _timeb tb; | |
2066 | struct tm *ptm; | |
2067 | #else | |
2068 | struct timeval tv; | |
2069 | struct tm tm; | |
2070 | #endif | |
2071 | const char *name = qdict_get_try_str(qdict, "name"); | |
2072 | ||
2073 | /* Verify if there is a device that doesn't support snapshots and is writable */ | |
2074 | bs = NULL; | |
2075 | while ((bs = bdrv_next(bs))) { | |
2076 | ||
2077 | if (!bdrv_is_inserted(bs) || bdrv_is_read_only(bs)) { | |
2078 | continue; | |
2079 | } | |
2080 | ||
2081 | if (!bdrv_can_snapshot(bs)) { | |
2082 | monitor_printf(mon, "Device '%s' is writable but does not support snapshots.\n", | |
2083 | bdrv_get_device_name(bs)); | |
2084 | return; | |
2085 | } | |
2086 | } | |
2087 | ||
2088 | bs = bdrv_snapshots(); | |
2089 | if (!bs) { | |
2090 | monitor_printf(mon, "No block device can accept snapshots\n"); | |
2091 | return; | |
2092 | } | |
2093 | ||
2094 | saved_vm_running = runstate_is_running(); | |
2095 | vm_stop(RUN_STATE_SAVE_VM); | |
2096 | ||
2097 | memset(sn, 0, sizeof(*sn)); | |
2098 | ||
2099 | /* fill auxiliary fields */ | |
2100 | #ifdef _WIN32 | |
2101 | _ftime(&tb); | |
2102 | sn->date_sec = tb.time; | |
2103 | sn->date_nsec = tb.millitm * 1000000; | |
2104 | #else | |
2105 | gettimeofday(&tv, NULL); | |
2106 | sn->date_sec = tv.tv_sec; | |
2107 | sn->date_nsec = tv.tv_usec * 1000; | |
2108 | #endif | |
2109 | sn->vm_clock_nsec = qemu_get_clock_ns(vm_clock); | |
2110 | ||
2111 | if (name) { | |
2112 | ret = bdrv_snapshot_find(bs, old_sn, name); | |
2113 | if (ret >= 0) { | |
2114 | pstrcpy(sn->name, sizeof(sn->name), old_sn->name); | |
2115 | pstrcpy(sn->id_str, sizeof(sn->id_str), old_sn->id_str); | |
2116 | } else { | |
2117 | pstrcpy(sn->name, sizeof(sn->name), name); | |
2118 | } | |
2119 | } else { | |
2120 | #ifdef _WIN32 | |
2121 | time_t t = tb.time; | |
2122 | ptm = localtime(&t); | |
2123 | strftime(sn->name, sizeof(sn->name), "vm-%Y%m%d%H%M%S", ptm); | |
2124 | #else | |
2125 | /* cast below needed for OpenBSD where tv_sec is still 'long' */ | |
2126 | localtime_r((const time_t *)&tv.tv_sec, &tm); | |
2127 | strftime(sn->name, sizeof(sn->name), "vm-%Y%m%d%H%M%S", &tm); | |
2128 | #endif | |
2129 | } | |
2130 | ||
2131 | /* Delete old snapshots of the same name */ | |
2132 | if (name && del_existing_snapshots(mon, name) < 0) { | |
2133 | goto the_end; | |
2134 | } | |
2135 | ||
2136 | /* save the VM state */ | |
2137 | f = qemu_fopen_bdrv(bs, 1); | |
2138 | if (!f) { | |
2139 | monitor_printf(mon, "Could not open VM state file\n"); | |
2140 | goto the_end; | |
2141 | } | |
2142 | ret = qemu_savevm_state(f); | |
2143 | vm_state_size = qemu_ftell(f); | |
2144 | qemu_fclose(f); | |
2145 | if (ret < 0) { | |
2146 | monitor_printf(mon, "Error %d while writing VM\n", ret); | |
2147 | goto the_end; | |
2148 | } | |
2149 | ||
2150 | /* create the snapshots */ | |
2151 | ||
2152 | bs1 = NULL; | |
2153 | while ((bs1 = bdrv_next(bs1))) { | |
2154 | if (bdrv_can_snapshot(bs1)) { | |
2155 | /* Write VM state size only to the image that contains the state */ | |
2156 | sn->vm_state_size = (bs == bs1 ? vm_state_size : 0); | |
2157 | ret = bdrv_snapshot_create(bs1, sn); | |
2158 | if (ret < 0) { | |
2159 | monitor_printf(mon, "Error while creating snapshot on '%s'\n", | |
2160 | bdrv_get_device_name(bs1)); | |
2161 | } | |
2162 | } | |
2163 | } | |
2164 | ||
2165 | the_end: | |
2166 | if (saved_vm_running) | |
2167 | vm_start(); | |
2168 | } | |
2169 | ||
2170 | void qmp_xen_save_devices_state(const char *filename, Error **errp) | |
2171 | { | |
2172 | QEMUFile *f; | |
2173 | int saved_vm_running; | |
2174 | int ret; | |
2175 | ||
2176 | saved_vm_running = runstate_is_running(); | |
2177 | vm_stop(RUN_STATE_SAVE_VM); | |
2178 | ||
2179 | f = qemu_fopen(filename, "wb"); | |
2180 | if (!f) { | |
2181 | error_set(errp, QERR_OPEN_FILE_FAILED, filename); | |
2182 | goto the_end; | |
2183 | } | |
2184 | ret = qemu_save_device_state(f); | |
2185 | qemu_fclose(f); | |
2186 | if (ret < 0) { | |
2187 | error_set(errp, QERR_IO_ERROR); | |
2188 | } | |
2189 | ||
2190 | the_end: | |
2191 | if (saved_vm_running) | |
2192 | vm_start(); | |
2193 | return; | |
2194 | } | |
2195 | ||
2196 | int load_vmstate(const char *name) | |
2197 | { | |
2198 | BlockDriverState *bs, *bs_vm_state; | |
2199 | QEMUSnapshotInfo sn; | |
2200 | QEMUFile *f; | |
2201 | int ret; | |
2202 | ||
2203 | bs_vm_state = bdrv_snapshots(); | |
2204 | if (!bs_vm_state) { | |
2205 | error_report("No block device supports snapshots"); | |
2206 | return -ENOTSUP; | |
2207 | } | |
2208 | ||
2209 | /* Don't even try to load empty VM states */ | |
2210 | ret = bdrv_snapshot_find(bs_vm_state, &sn, name); | |
2211 | if (ret < 0) { | |
2212 | return ret; | |
2213 | } else if (sn.vm_state_size == 0) { | |
2214 | error_report("This is a disk-only snapshot. Revert to it offline " | |
2215 | "using qemu-img."); | |
2216 | return -EINVAL; | |
2217 | } | |
2218 | ||
2219 | /* Verify if there is any device that doesn't support snapshots and is | |
2220 | writable and check if the requested snapshot is available too. */ | |
2221 | bs = NULL; | |
2222 | while ((bs = bdrv_next(bs))) { | |
2223 | ||
2224 | if (!bdrv_is_inserted(bs) || bdrv_is_read_only(bs)) { | |
2225 | continue; | |
2226 | } | |
2227 | ||
2228 | if (!bdrv_can_snapshot(bs)) { | |
2229 | error_report("Device '%s' is writable but does not support snapshots.", | |
2230 | bdrv_get_device_name(bs)); | |
2231 | return -ENOTSUP; | |
2232 | } | |
2233 | ||
2234 | ret = bdrv_snapshot_find(bs, &sn, name); | |
2235 | if (ret < 0) { | |
2236 | error_report("Device '%s' does not have the requested snapshot '%s'", | |
2237 | bdrv_get_device_name(bs), name); | |
2238 | return ret; | |
2239 | } | |
2240 | } | |
2241 | ||
2242 | /* Flush all IO requests so they don't interfere with the new state. */ | |
2243 | bdrv_drain_all(); | |
2244 | ||
2245 | bs = NULL; | |
2246 | while ((bs = bdrv_next(bs))) { | |
2247 | if (bdrv_can_snapshot(bs)) { | |
2248 | ret = bdrv_snapshot_goto(bs, name); | |
2249 | if (ret < 0) { | |
2250 | error_report("Error %d while activating snapshot '%s' on '%s'", | |
2251 | ret, name, bdrv_get_device_name(bs)); | |
2252 | return ret; | |
2253 | } | |
2254 | } | |
2255 | } | |
2256 | ||
2257 | /* restore the VM state */ | |
2258 | f = qemu_fopen_bdrv(bs_vm_state, 0); | |
2259 | if (!f) { | |
2260 | error_report("Could not open VM state file"); | |
2261 | return -EINVAL; | |
2262 | } | |
2263 | ||
2264 | qemu_system_reset(VMRESET_SILENT); | |
2265 | ret = qemu_loadvm_state(f); | |
2266 | ||
2267 | qemu_fclose(f); | |
2268 | if (ret < 0) { | |
2269 | error_report("Error %d while loading VM state", ret); | |
2270 | return ret; | |
2271 | } | |
2272 | ||
2273 | return 0; | |
2274 | } | |
2275 | ||
2276 | void do_delvm(Monitor *mon, const QDict *qdict) | |
2277 | { | |
2278 | BlockDriverState *bs, *bs1; | |
2279 | int ret; | |
2280 | const char *name = qdict_get_str(qdict, "name"); | |
2281 | ||
2282 | bs = bdrv_snapshots(); | |
2283 | if (!bs) { | |
2284 | monitor_printf(mon, "No block device supports snapshots\n"); | |
2285 | return; | |
2286 | } | |
2287 | ||
2288 | bs1 = NULL; | |
2289 | while ((bs1 = bdrv_next(bs1))) { | |
2290 | if (bdrv_can_snapshot(bs1)) { | |
2291 | ret = bdrv_snapshot_delete(bs1, name); | |
2292 | if (ret < 0) { | |
2293 | if (ret == -ENOTSUP) | |
2294 | monitor_printf(mon, | |
2295 | "Snapshots not supported on device '%s'\n", | |
2296 | bdrv_get_device_name(bs1)); | |
2297 | else | |
2298 | monitor_printf(mon, "Error %d while deleting snapshot on " | |
2299 | "'%s'\n", ret, bdrv_get_device_name(bs1)); | |
2300 | } | |
2301 | } | |
2302 | } | |
2303 | } | |
2304 | ||
2305 | void do_info_snapshots(Monitor *mon) | |
2306 | { | |
2307 | BlockDriverState *bs, *bs1; | |
2308 | QEMUSnapshotInfo *sn_tab, *sn, s, *sn_info = &s; | |
2309 | int nb_sns, i, ret, available; | |
2310 | int total; | |
2311 | int *available_snapshots; | |
2312 | char buf[256]; | |
2313 | ||
2314 | bs = bdrv_snapshots(); | |
2315 | if (!bs) { | |
2316 | monitor_printf(mon, "No available block device supports snapshots\n"); | |
2317 | return; | |
2318 | } | |
2319 | ||
2320 | nb_sns = bdrv_snapshot_list(bs, &sn_tab); | |
2321 | if (nb_sns < 0) { | |
2322 | monitor_printf(mon, "bdrv_snapshot_list: error %d\n", nb_sns); | |
2323 | return; | |
2324 | } | |
2325 | ||
2326 | if (nb_sns == 0) { | |
2327 | monitor_printf(mon, "There is no snapshot available.\n"); | |
2328 | return; | |
2329 | } | |
2330 | ||
2331 | available_snapshots = g_malloc0(sizeof(int) * nb_sns); | |
2332 | total = 0; | |
2333 | for (i = 0; i < nb_sns; i++) { | |
2334 | sn = &sn_tab[i]; | |
2335 | available = 1; | |
2336 | bs1 = NULL; | |
2337 | ||
2338 | while ((bs1 = bdrv_next(bs1))) { | |
2339 | if (bdrv_can_snapshot(bs1) && bs1 != bs) { | |
2340 | ret = bdrv_snapshot_find(bs1, sn_info, sn->id_str); | |
2341 | if (ret < 0) { | |
2342 | available = 0; | |
2343 | break; | |
2344 | } | |
2345 | } | |
2346 | } | |
2347 | ||
2348 | if (available) { | |
2349 | available_snapshots[total] = i; | |
2350 | total++; | |
2351 | } | |
2352 | } | |
2353 | ||
2354 | if (total > 0) { | |
2355 | monitor_printf(mon, "%s\n", bdrv_snapshot_dump(buf, sizeof(buf), NULL)); | |
2356 | for (i = 0; i < total; i++) { | |
2357 | sn = &sn_tab[available_snapshots[i]]; | |
2358 | monitor_printf(mon, "%s\n", bdrv_snapshot_dump(buf, sizeof(buf), sn)); | |
2359 | } | |
2360 | } else { | |
2361 | monitor_printf(mon, "There is no suitable snapshot available\n"); | |
2362 | } | |
2363 | ||
2364 | g_free(sn_tab); | |
2365 | g_free(available_snapshots); | |
2366 | ||
2367 | } | |
2368 | ||
2369 | void vmstate_register_ram(MemoryRegion *mr, DeviceState *dev) | |
2370 | { | |
2371 | qemu_ram_set_idstr(memory_region_get_ram_addr(mr) & TARGET_PAGE_MASK, | |
2372 | memory_region_name(mr), dev); | |
2373 | } | |
2374 | ||
2375 | void vmstate_unregister_ram(MemoryRegion *mr, DeviceState *dev) | |
2376 | { | |
2377 | /* Nothing do to while the implementation is in RAMBlock */ | |
2378 | } | |
2379 | ||
2380 | void vmstate_register_ram_global(MemoryRegion *mr) | |
2381 | { | |
2382 | vmstate_register_ram(mr, NULL); | |
2383 | } |