4 * Copyright IBM, Corp. 2008
7 * Anthony Liguori <aliguori@us.ibm.com>
9 * This work is licensed under the terms of the GNU GPL, version 2. See
10 * the COPYING file in the top-level directory.
14 #include "qemu-common.h"
15 #include "migration.h"
17 #include "buffered_file.h"
20 #include "qemu_socket.h"
22 //#define DEBUG_MIGRATION
24 #ifdef DEBUG_MIGRATION
25 #define dprintf(fmt, ...) \
26 do { printf("migration: " fmt, ## __VA_ARGS__); } while (0)
28 #define dprintf(fmt, ...) \
32 /* Migration speed throttling */
33 static uint32_t max_throttle = (32 << 20);
35 static MigrationState *current_migration;
37 void qemu_start_incoming_migration(const char *uri)
41 if (strstart(uri, "tcp:", &p))
42 tcp_start_incoming_migration(p);
44 else if (strstart(uri, "exec:", &p))
45 exec_start_incoming_migration(p);
48 fprintf(stderr, "unknown migration protocol: %s\n", uri);
51 void do_migrate(Monitor *mon, int detach, const char *uri)
53 MigrationState *s = NULL;
56 if (strstart(uri, "tcp:", &p))
57 s = tcp_start_outgoing_migration(p, max_throttle, detach);
59 else if (strstart(uri, "exec:", &p))
60 s = exec_start_outgoing_migration(p, max_throttle, detach);
63 monitor_printf(mon, "unknown migration protocol: %s\n", uri);
66 monitor_printf(mon, "migration failed\n");
68 if (current_migration)
69 current_migration->release(current_migration);
71 current_migration = s;
75 void do_migrate_cancel(Monitor *mon)
77 MigrationState *s = current_migration;
83 void do_migrate_set_speed(Monitor *mon, const char *value)
88 d = strtod(value, &ptr);
100 max_throttle = (uint32_t)d;
103 void do_info_migrate(Monitor *mon)
105 MigrationState *s = current_migration;
108 monitor_printf(mon, "Migration status: ");
109 switch (s->get_status(s)) {
110 case MIG_STATE_ACTIVE:
111 monitor_printf(mon, "active\n");
112 monitor_printf(mon, "transferred ram: %" PRIu64 " kbytes\n", ram_bytes_transferred() >> 10);
113 monitor_printf(mon, "remaining ram: %" PRIu64 " kbytes\n", ram_bytes_remaining() >> 10);
114 monitor_printf(mon, "total ram: %" PRIu64 " kbytes\n", ram_bytes_total() >> 10);
116 case MIG_STATE_COMPLETED:
117 monitor_printf(mon, "completed\n");
119 case MIG_STATE_ERROR:
120 monitor_printf(mon, "failed\n");
122 case MIG_STATE_CANCELLED:
123 monitor_printf(mon, "cancelled\n");
129 /* shared migration helpers */
131 void migrate_fd_monitor_suspend(FdMigrationState *s)
133 s->mon_resume = cur_mon;
134 if (monitor_suspend(cur_mon) == 0)
135 dprintf("suspending monitor\n");
137 monitor_printf(cur_mon, "terminal does not allow synchronous "
138 "migration, continuing detached\n");
141 void migrate_fd_error(FdMigrationState *s)
143 dprintf("setting error state\n");
144 s->state = MIG_STATE_ERROR;
145 migrate_fd_cleanup(s);
148 void migrate_fd_cleanup(FdMigrationState *s)
150 qemu_set_fd_handler2(s->fd, NULL, NULL, NULL, NULL);
153 dprintf("closing file\n");
154 qemu_fclose(s->file);
160 /* Don't resume monitor until we've flushed all of the buffers */
162 monitor_resume(s->mon_resume);
167 void migrate_fd_put_notify(void *opaque)
169 FdMigrationState *s = opaque;
171 qemu_set_fd_handler2(s->fd, NULL, NULL, NULL, NULL);
172 qemu_file_put_notify(s->file);
175 ssize_t migrate_fd_put_buffer(void *opaque, const void *data, size_t size)
177 FdMigrationState *s = opaque;
181 ret = s->write(s, data, size);
182 } while (ret == -1 && ((s->get_error(s)) == EINTR));
185 ret = -(s->get_error(s));
188 qemu_set_fd_handler2(s->fd, NULL, NULL, migrate_fd_put_notify, s);
193 void migrate_fd_connect(FdMigrationState *s)
197 s->file = qemu_fopen_ops_buffered(s,
199 migrate_fd_put_buffer,
200 migrate_fd_put_ready,
201 migrate_fd_wait_for_unfreeze,
204 dprintf("beginning savevm\n");
205 ret = qemu_savevm_state_begin(s->file);
207 dprintf("failed, %d\n", ret);
212 migrate_fd_put_ready(s);
215 void migrate_fd_put_ready(void *opaque)
217 FdMigrationState *s = opaque;
219 if (s->state != MIG_STATE_ACTIVE) {
220 dprintf("put_ready returning because of non-active state\n");
224 dprintf("iterate\n");
225 if (qemu_savevm_state_iterate(s->file) == 1) {
227 dprintf("done iterating\n");
231 if ((qemu_savevm_state_complete(s->file)) < 0) {
233 state = MIG_STATE_ERROR;
235 state = MIG_STATE_COMPLETED;
237 migrate_fd_cleanup(s);
242 int migrate_fd_get_status(MigrationState *mig_state)
244 FdMigrationState *s = migrate_to_fms(mig_state);
248 void migrate_fd_cancel(MigrationState *mig_state)
250 FdMigrationState *s = migrate_to_fms(mig_state);
252 if (s->state != MIG_STATE_ACTIVE)
255 dprintf("cancelling migration\n");
257 s->state = MIG_STATE_CANCELLED;
259 migrate_fd_cleanup(s);
262 void migrate_fd_release(MigrationState *mig_state)
264 FdMigrationState *s = migrate_to_fms(mig_state);
266 dprintf("releasing state\n");
268 if (s->state == MIG_STATE_ACTIVE) {
269 s->state = MIG_STATE_CANCELLED;
270 migrate_fd_cleanup(s);
275 void migrate_fd_wait_for_unfreeze(void *opaque)
277 FdMigrationState *s = opaque;
280 dprintf("wait for unfreeze\n");
281 if (s->state != MIG_STATE_ACTIVE)
288 FD_SET(s->fd, &wfds);
290 ret = select(s->fd + 1, NULL, &wfds, NULL, NULL);
291 } while (ret == -1 && (s->get_error(s)) == EINTR);
294 int migrate_fd_close(void *opaque)
296 FdMigrationState *s = opaque;