2 * QEMU live migration via Unix Domain Sockets
4 * Copyright Red Hat, Inc. 2009
7 * Chris Lalancette <clalance@redhat.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 "qemu_socket.h"
16 #include "migration.h"
17 #include "qemu-char.h"
19 #include "buffered_file.h"
22 //#define DEBUG_MIGRATION_UNIX
24 #ifdef DEBUG_MIGRATION_UNIX
25 #define dprintf(fmt, ...) \
26 do { printf("migration-unix: " fmt, ## __VA_ARGS__); } while (0)
28 #define dprintf(fmt, ...) \
32 static int unix_errno(FdMigrationState
*s
)
37 static int unix_write(FdMigrationState
*s
, const void * buf
, size_t size
)
39 return write(s
->fd
, buf
, size
);
42 static int unix_close(FdMigrationState
*s
)
44 dprintf("unix_close\n");
52 static void unix_wait_for_connect(void *opaque
)
54 FdMigrationState
*s
= opaque
;
56 socklen_t valsize
= sizeof(val
);
58 dprintf("connect completed\n");
60 ret
= getsockopt(s
->fd
, SOL_SOCKET
, SO_ERROR
, (void *) &val
, &valsize
);
61 } while (ret
== -1 && (s
->get_error(s
)) == EINTR
);
68 qemu_set_fd_handler2(s
->fd
, NULL
, NULL
, NULL
, NULL
);
71 migrate_fd_connect(s
);
73 dprintf("error connecting %d\n", val
);
78 MigrationState
*unix_start_outgoing_migration(Monitor
*mon
,
80 int64_t bandwidth_limit
,
86 struct sockaddr_un addr
;
89 addr
.sun_family
= AF_UNIX
;
90 snprintf(addr
.sun_path
, sizeof(addr
.sun_path
), "%s", path
);
92 s
= qemu_mallocz(sizeof(*s
));
94 s
->get_error
= unix_errno
;
95 s
->write
= unix_write
;
96 s
->close
= unix_close
;
97 s
->mig_state
.cancel
= migrate_fd_cancel
;
98 s
->mig_state
.get_status
= migrate_fd_get_status
;
99 s
->mig_state
.release
= migrate_fd_release
;
101 s
->mig_state
.blk
= blk
;
102 s
->mig_state
.shared
= inc
;
104 s
->state
= MIG_STATE_ACTIVE
;
106 s
->bandwidth_limit
= bandwidth_limit
;
107 s
->fd
= qemu_socket(PF_UNIX
, SOCK_STREAM
, 0);
109 dprintf("Unable to open socket");
110 goto err_after_alloc
;
113 socket_set_nonblock(s
->fd
);
116 migrate_fd_monitor_suspend(s
, mon
);
120 ret
= connect(s
->fd
, (struct sockaddr
*)&addr
, sizeof(addr
));
122 ret
= -(s
->get_error(s
));
124 if (ret
== -EINPROGRESS
|| ret
== -EWOULDBLOCK
)
125 qemu_set_fd_handler2(s
->fd
, NULL
, NULL
, unix_wait_for_connect
, s
);
126 } while (ret
== -EINTR
);
128 if (ret
< 0 && ret
!= -EINPROGRESS
&& ret
!= -EWOULDBLOCK
) {
129 dprintf("connect failed\n");
132 migrate_fd_connect(s
);
134 return &s
->mig_state
;
144 static void unix_accept_incoming_migration(void *opaque
)
146 struct sockaddr_un addr
;
147 socklen_t addrlen
= sizeof(addr
);
148 int s
= (unsigned long)opaque
;
153 c
= qemu_accept(s
, (struct sockaddr
*)&addr
, &addrlen
);
154 } while (c
== -1 && socket_error() == EINTR
);
156 dprintf("accepted migration\n");
159 fprintf(stderr
, "could not accept migration connection\n");
163 f
= qemu_fopen_socket(c
);
165 fprintf(stderr
, "could not qemu_fopen socket\n");
169 ret
= qemu_loadvm_state(f
);
171 fprintf(stderr
, "load of migration failed\n");
174 qemu_announce_self();
175 dprintf("successfully loaded vm state\n");
177 /* we've successfully migrated, close the server socket */
178 qemu_set_fd_handler2(s
, NULL
, NULL
, NULL
, NULL
);
187 int unix_start_incoming_migration(const char *path
)
189 struct sockaddr_un un
;
192 dprintf("Attempting to start an incoming migration\n");
194 sock
= qemu_socket(PF_UNIX
, SOCK_STREAM
, 0);
196 fprintf(stderr
, "Could not open unix socket: %s\n", strerror(errno
));
200 memset(&un
, 0, sizeof(un
));
201 un
.sun_family
= AF_UNIX
;
202 snprintf(un
.sun_path
, sizeof(un
.sun_path
), "%s", path
);
205 if (bind(sock
, (struct sockaddr
*) &un
, sizeof(un
)) < 0) {
206 fprintf(stderr
, "bind(unix:%s): %s\n", un
.sun_path
, strerror(errno
));
209 if (listen(sock
, 1) < 0) {
210 fprintf(stderr
, "listen(unix:%s): %s\n", un
.sun_path
, strerror(errno
));
214 qemu_set_fd_handler2(sock
, NULL
, unix_accept_incoming_migration
, NULL
,
215 (void *)(unsigned long)sock
);