2 * QEMU Guest Agent POSIX-specific command implementations
4 * Copyright IBM Corp. 2011
7 * Michael Roth <mdroth@linux.vnet.ibm.com>
8 * Michal Privoznik <mprivozn@redhat.com>
10 * This work is licensed under the terms of the GNU GPL, version 2 or later.
11 * See the COPYING file in the top-level directory.
15 #include <sys/types.h>
16 #include <sys/ioctl.h>
25 #include "qga/guest-agent-core.h"
26 #include "qga-qmp-commands.h"
27 #include "qapi/qmp/qerror.h"
28 #include "qemu/queue.h"
29 #include "qemu/host-utils.h"
31 #ifndef CONFIG_HAS_ENVIRON
33 #include <crt_externs.h>
34 #define environ (*_NSGetEnviron())
36 extern char **environ
;
40 #if defined(__linux__)
44 #include <arpa/inet.h>
45 #include <sys/socket.h>
49 #define CONFIG_FSFREEZE
56 static void ga_wait_child(pid_t pid
, int *status
, Error
**err
)
63 rpid
= waitpid(pid
, status
, 0);
64 } while (rpid
== -1 && errno
== EINTR
);
67 error_setg_errno(err
, errno
, "failed to wait for child (pid: %d)", pid
);
71 g_assert(rpid
== pid
);
74 void qmp_guest_shutdown(bool has_mode
, const char *mode
, Error
**err
)
76 const char *shutdown_flag
;
77 Error
*local_err
= NULL
;
81 slog("guest-shutdown called, mode: %s", mode
);
82 if (!has_mode
|| strcmp(mode
, "powerdown") == 0) {
84 } else if (strcmp(mode
, "halt") == 0) {
86 } else if (strcmp(mode
, "reboot") == 0) {
90 "mode is invalid (valid values are: halt|powerdown|reboot");
96 /* child, start the shutdown */
100 reopen_fd_to_null(2);
102 execle("/sbin/shutdown", "shutdown", "-h", shutdown_flag
, "+0",
103 "hypervisor initiated shutdown", (char*)NULL
, environ
);
105 } else if (pid
< 0) {
106 error_setg_errno(err
, errno
, "failed to create child process");
110 ga_wait_child(pid
, &status
, &local_err
);
111 if (error_is_set(&local_err
)) {
112 error_propagate(err
, local_err
);
116 if (!WIFEXITED(status
)) {
117 error_setg(err
, "child process has terminated abnormally");
121 if (WEXITSTATUS(status
)) {
122 error_setg(err
, "child process has failed to shutdown");
129 int64_t qmp_guest_get_time(Error
**errp
)
135 ret
= qemu_gettimeofday(&tq
);
137 error_setg_errno(errp
, errno
, "Failed to get time");
141 time_ns
= tq
.tv_sec
* 1000000000LL + tq
.tv_usec
* 1000;
145 void qmp_guest_set_time(int64_t time_ns
, Error
**errp
)
150 Error
*local_err
= NULL
;
153 /* year-2038 will overflow in case time_t is 32bit */
154 if (time_ns
/ 1000000000 != (time_t)(time_ns
/ 1000000000)) {
155 error_setg(errp
, "Time %" PRId64
" is too large", time_ns
);
159 tv
.tv_sec
= time_ns
/ 1000000000;
160 tv
.tv_usec
= (time_ns
% 1000000000) / 1000;
162 ret
= settimeofday(&tv
, NULL
);
164 error_setg_errno(errp
, errno
, "Failed to set time to guest");
168 /* Set the Hardware Clock to the current System Time. */
172 reopen_fd_to_null(0);
173 reopen_fd_to_null(1);
174 reopen_fd_to_null(2);
176 execle("/sbin/hwclock", "hwclock", "-w", NULL
, environ
);
178 } else if (pid
< 0) {
179 error_setg_errno(errp
, errno
, "failed to create child process");
183 ga_wait_child(pid
, &status
, &local_err
);
184 if (error_is_set(&local_err
)) {
185 error_propagate(errp
, local_err
);
189 if (!WIFEXITED(status
)) {
190 error_setg(errp
, "child process has terminated abnormally");
194 if (WEXITSTATUS(status
)) {
195 error_setg(errp
, "hwclock failed to set hardware clock to system time");
200 typedef struct GuestFileHandle
{
203 QTAILQ_ENTRY(GuestFileHandle
) next
;
207 QTAILQ_HEAD(, GuestFileHandle
) filehandles
;
210 static int64_t guest_file_handle_add(FILE *fh
, Error
**errp
)
212 GuestFileHandle
*gfh
;
215 handle
= ga_get_fd_handle(ga_state
, errp
);
216 if (error_is_set(errp
)) {
220 gfh
= g_malloc0(sizeof(GuestFileHandle
));
223 QTAILQ_INSERT_TAIL(&guest_file_state
.filehandles
, gfh
, next
);
228 static GuestFileHandle
*guest_file_handle_find(int64_t id
, Error
**err
)
230 GuestFileHandle
*gfh
;
232 QTAILQ_FOREACH(gfh
, &guest_file_state
.filehandles
, next
)
239 error_setg(err
, "handle '%" PRId64
"' has not been found", id
);
243 typedef const char * const ccpc
;
249 /* http://pubs.opengroup.org/onlinepubs/9699919799/functions/fopen.html */
250 static const struct {
253 } guest_file_open_modes
[] = {
254 { (ccpc
[]){ "r", NULL
}, O_RDONLY
},
255 { (ccpc
[]){ "rb", NULL
}, O_RDONLY
| O_BINARY
},
256 { (ccpc
[]){ "w", NULL
}, O_WRONLY
| O_CREAT
| O_TRUNC
},
257 { (ccpc
[]){ "wb", NULL
}, O_WRONLY
| O_CREAT
| O_TRUNC
| O_BINARY
},
258 { (ccpc
[]){ "a", NULL
}, O_WRONLY
| O_CREAT
| O_APPEND
},
259 { (ccpc
[]){ "ab", NULL
}, O_WRONLY
| O_CREAT
| O_APPEND
| O_BINARY
},
260 { (ccpc
[]){ "r+", NULL
}, O_RDWR
},
261 { (ccpc
[]){ "rb+", "r+b", NULL
}, O_RDWR
| O_BINARY
},
262 { (ccpc
[]){ "w+", NULL
}, O_RDWR
| O_CREAT
| O_TRUNC
},
263 { (ccpc
[]){ "wb+", "w+b", NULL
}, O_RDWR
| O_CREAT
| O_TRUNC
| O_BINARY
},
264 { (ccpc
[]){ "a+", NULL
}, O_RDWR
| O_CREAT
| O_APPEND
},
265 { (ccpc
[]){ "ab+", "a+b", NULL
}, O_RDWR
| O_CREAT
| O_APPEND
| O_BINARY
}
269 find_open_flag(const char *mode_str
, Error
**err
)
273 for (mode
= 0; mode
< ARRAY_SIZE(guest_file_open_modes
); ++mode
) {
276 form
= guest_file_open_modes
[mode
].forms
;
277 while (*form
!= NULL
&& strcmp(*form
, mode_str
) != 0) {
285 if (mode
== ARRAY_SIZE(guest_file_open_modes
)) {
286 error_setg(err
, "invalid file open mode '%s'", mode_str
);
289 return guest_file_open_modes
[mode
].oflag_base
| O_NOCTTY
| O_NONBLOCK
;
292 #define DEFAULT_NEW_FILE_MODE (S_IRUSR | S_IWUSR | \
293 S_IRGRP | S_IWGRP | \
297 safe_open_or_create(const char *path
, const char *mode
, Error
**err
)
299 Error
*local_err
= NULL
;
302 oflag
= find_open_flag(mode
, &local_err
);
303 if (local_err
== NULL
) {
306 /* If the caller wants / allows creation of a new file, we implement it
307 * with a two step process: open() + (open() / fchmod()).
309 * First we insist on creating the file exclusively as a new file. If
310 * that succeeds, we're free to set any file-mode bits on it. (The
311 * motivation is that we want to set those file-mode bits independently
312 * of the current umask.)
314 * If the exclusive creation fails because the file already exists
315 * (EEXIST is not possible for any other reason), we just attempt to
316 * open the file, but in this case we won't be allowed to change the
317 * file-mode bits on the preexistent file.
319 * The pathname should never disappear between the two open()s in
320 * practice. If it happens, then someone very likely tried to race us.
321 * In this case just go ahead and report the ENOENT from the second
322 * open() to the caller.
324 * If the caller wants to open a preexistent file, then the first
325 * open() is decisive and its third argument is ignored, and the second
326 * open() and the fchmod() are never called.
328 fd
= open(path
, oflag
| ((oflag
& O_CREAT
) ? O_EXCL
: 0), 0);
329 if (fd
== -1 && errno
== EEXIST
) {
330 oflag
&= ~(unsigned)O_CREAT
;
331 fd
= open(path
, oflag
);
335 error_setg_errno(&local_err
, errno
, "failed to open file '%s' "
336 "(mode: '%s')", path
, mode
);
338 qemu_set_cloexec(fd
);
340 if ((oflag
& O_CREAT
) && fchmod(fd
, DEFAULT_NEW_FILE_MODE
) == -1) {
341 error_setg_errno(&local_err
, errno
, "failed to set permission "
342 "0%03o on new file '%s' (mode: '%s')",
343 (unsigned)DEFAULT_NEW_FILE_MODE
, path
, mode
);
347 f
= fdopen(fd
, mode
);
349 error_setg_errno(&local_err
, errno
, "failed to associate "
350 "stdio stream with file descriptor %d, "
351 "file '%s' (mode: '%s')", fd
, path
, mode
);
358 if (oflag
& O_CREAT
) {
364 error_propagate(err
, local_err
);
368 int64_t qmp_guest_file_open(const char *path
, bool has_mode
, const char *mode
, Error
**err
)
371 Error
*local_err
= NULL
;
373 int64_t ret
= -1, handle
;
378 slog("guest-file-open called, filepath: %s, mode: %s", path
, mode
);
379 fh
= safe_open_or_create(path
, mode
, &local_err
);
380 if (local_err
!= NULL
) {
381 error_propagate(err
, local_err
);
385 /* set fd non-blocking to avoid common use cases (like reading from a
386 * named pipe) from hanging the agent
389 ret
= fcntl(fd
, F_GETFL
);
390 ret
= fcntl(fd
, F_SETFL
, ret
| O_NONBLOCK
);
392 error_setg_errno(err
, errno
, "failed to make file '%s' non-blocking",
398 handle
= guest_file_handle_add(fh
, err
);
399 if (error_is_set(err
)) {
404 slog("guest-file-open, handle: %" PRId64
, handle
);
408 void qmp_guest_file_close(int64_t handle
, Error
**err
)
410 GuestFileHandle
*gfh
= guest_file_handle_find(handle
, err
);
413 slog("guest-file-close called, handle: %" PRId64
, handle
);
418 ret
= fclose(gfh
->fh
);
420 error_setg_errno(err
, errno
, "failed to close handle");
424 QTAILQ_REMOVE(&guest_file_state
.filehandles
, gfh
, next
);
428 struct GuestFileRead
*qmp_guest_file_read(int64_t handle
, bool has_count
,
429 int64_t count
, Error
**err
)
431 GuestFileHandle
*gfh
= guest_file_handle_find(handle
, err
);
432 GuestFileRead
*read_data
= NULL
;
442 count
= QGA_READ_COUNT_DEFAULT
;
443 } else if (count
< 0) {
444 error_setg(err
, "value '%" PRId64
"' is invalid for argument count",
450 buf
= g_malloc0(count
+1);
451 read_count
= fread(buf
, 1, count
, fh
);
453 error_setg_errno(err
, errno
, "failed to read file");
454 slog("guest-file-read failed, handle: %" PRId64
, handle
);
457 read_data
= g_malloc0(sizeof(GuestFileRead
));
458 read_data
->count
= read_count
;
459 read_data
->eof
= feof(fh
);
461 read_data
->buf_b64
= g_base64_encode(buf
, read_count
);
470 GuestFileWrite
*qmp_guest_file_write(int64_t handle
, const char *buf_b64
,
471 bool has_count
, int64_t count
, Error
**err
)
473 GuestFileWrite
*write_data
= NULL
;
477 GuestFileHandle
*gfh
= guest_file_handle_find(handle
, err
);
485 buf
= g_base64_decode(buf_b64
, &buf_len
);
489 } else if (count
< 0 || count
> buf_len
) {
490 error_setg(err
, "value '%" PRId64
"' is invalid for argument count",
496 write_count
= fwrite(buf
, 1, count
, fh
);
498 error_setg_errno(err
, errno
, "failed to write to file");
499 slog("guest-file-write failed, handle: %" PRId64
, handle
);
501 write_data
= g_malloc0(sizeof(GuestFileWrite
));
502 write_data
->count
= write_count
;
503 write_data
->eof
= feof(fh
);
511 struct GuestFileSeek
*qmp_guest_file_seek(int64_t handle
, int64_t offset
,
512 int64_t whence
, Error
**err
)
514 GuestFileHandle
*gfh
= guest_file_handle_find(handle
, err
);
515 GuestFileSeek
*seek_data
= NULL
;
524 ret
= fseek(fh
, offset
, whence
);
526 error_setg_errno(err
, errno
, "failed to seek file");
528 seek_data
= g_malloc0(sizeof(GuestFileRead
));
529 seek_data
->position
= ftell(fh
);
530 seek_data
->eof
= feof(fh
);
537 void qmp_guest_file_flush(int64_t handle
, Error
**err
)
539 GuestFileHandle
*gfh
= guest_file_handle_find(handle
, err
);
550 error_setg_errno(err
, errno
, "failed to flush file");
554 static void guest_file_init(void)
556 QTAILQ_INIT(&guest_file_state
.filehandles
);
559 /* linux-specific implementations. avoid this if at all possible. */
560 #if defined(__linux__)
562 #if defined(CONFIG_FSFREEZE) || defined(CONFIG_FSTRIM)
563 typedef struct FsMount
{
566 QTAILQ_ENTRY(FsMount
) next
;
569 typedef QTAILQ_HEAD(FsMountList
, FsMount
) FsMountList
;
571 static void free_fs_mount_list(FsMountList
*mounts
)
573 FsMount
*mount
, *temp
;
579 QTAILQ_FOREACH_SAFE(mount
, mounts
, next
, temp
) {
580 QTAILQ_REMOVE(mounts
, mount
, next
);
581 g_free(mount
->dirname
);
582 g_free(mount
->devtype
);
588 * Walk the mount table and build a list of local file systems
590 static void build_fs_mount_list(FsMountList
*mounts
, Error
**err
)
594 char const *mtab
= "/proc/self/mounts";
597 fp
= setmntent(mtab
, "r");
599 error_setg(err
, "failed to open mtab file: '%s'", mtab
);
603 while ((ment
= getmntent(fp
))) {
605 * An entry which device name doesn't start with a '/' is
606 * either a dummy file system or a network file system.
607 * Add special handling for smbfs and cifs as is done by
610 if ((ment
->mnt_fsname
[0] != '/') ||
611 (strcmp(ment
->mnt_type
, "smbfs") == 0) ||
612 (strcmp(ment
->mnt_type
, "cifs") == 0)) {
616 mount
= g_malloc0(sizeof(FsMount
));
617 mount
->dirname
= g_strdup(ment
->mnt_dir
);
618 mount
->devtype
= g_strdup(ment
->mnt_type
);
620 QTAILQ_INSERT_TAIL(mounts
, mount
, next
);
627 #if defined(CONFIG_FSFREEZE)
630 FSFREEZE_HOOK_THAW
= 0,
631 FSFREEZE_HOOK_FREEZE
,
634 const char *fsfreeze_hook_arg_string
[] = {
639 static void execute_fsfreeze_hook(FsfreezeHookArg arg
, Error
**err
)
644 const char *arg_str
= fsfreeze_hook_arg_string
[arg
];
645 Error
*local_err
= NULL
;
647 hook
= ga_fsfreeze_hook(ga_state
);
651 if (access(hook
, X_OK
) != 0) {
652 error_setg_errno(err
, errno
, "can't access fsfreeze hook '%s'", hook
);
656 slog("executing fsfreeze hook with arg '%s'", arg_str
);
660 reopen_fd_to_null(0);
661 reopen_fd_to_null(1);
662 reopen_fd_to_null(2);
664 execle(hook
, hook
, arg_str
, NULL
, environ
);
666 } else if (pid
< 0) {
667 error_setg_errno(err
, errno
, "failed to create child process");
671 ga_wait_child(pid
, &status
, &local_err
);
672 if (error_is_set(&local_err
)) {
673 error_propagate(err
, local_err
);
677 if (!WIFEXITED(status
)) {
678 error_setg(err
, "fsfreeze hook has terminated abnormally");
682 status
= WEXITSTATUS(status
);
684 error_setg(err
, "fsfreeze hook has failed with status %d", status
);
690 * Return status of freeze/thaw
692 GuestFsfreezeStatus
qmp_guest_fsfreeze_status(Error
**err
)
694 if (ga_is_frozen(ga_state
)) {
695 return GUEST_FSFREEZE_STATUS_FROZEN
;
698 return GUEST_FSFREEZE_STATUS_THAWED
;
702 * Walk list of mounted file systems in the guest, and freeze the ones which
703 * are real local file systems.
705 int64_t qmp_guest_fsfreeze_freeze(Error
**err
)
709 struct FsMount
*mount
;
710 Error
*local_err
= NULL
;
713 slog("guest-fsfreeze called");
715 execute_fsfreeze_hook(FSFREEZE_HOOK_FREEZE
, &local_err
);
716 if (error_is_set(&local_err
)) {
717 error_propagate(err
, local_err
);
721 QTAILQ_INIT(&mounts
);
722 build_fs_mount_list(&mounts
, &local_err
);
723 if (error_is_set(&local_err
)) {
724 error_propagate(err
, local_err
);
728 /* cannot risk guest agent blocking itself on a write in this state */
729 ga_set_frozen(ga_state
);
731 QTAILQ_FOREACH_REVERSE(mount
, &mounts
, FsMountList
, next
) {
732 fd
= qemu_open(mount
->dirname
, O_RDONLY
);
734 error_setg_errno(err
, errno
, "failed to open %s", mount
->dirname
);
738 /* we try to cull filesytems we know won't work in advance, but other
739 * filesytems may not implement fsfreeze for less obvious reasons.
740 * these will report EOPNOTSUPP. we simply ignore these when tallying
741 * the number of frozen filesystems.
743 * any other error means a failure to freeze a filesystem we
744 * expect to be freezable, so return an error in those cases
745 * and return system to thawed state.
747 ret
= ioctl(fd
, FIFREEZE
);
749 if (errno
!= EOPNOTSUPP
) {
750 error_setg_errno(err
, errno
, "failed to freeze %s",
761 free_fs_mount_list(&mounts
);
765 free_fs_mount_list(&mounts
);
766 qmp_guest_fsfreeze_thaw(NULL
);
771 * Walk list of frozen file systems in the guest, and thaw them.
773 int64_t qmp_guest_fsfreeze_thaw(Error
**err
)
778 int fd
, i
= 0, logged
;
779 Error
*local_err
= NULL
;
781 QTAILQ_INIT(&mounts
);
782 build_fs_mount_list(&mounts
, &local_err
);
783 if (error_is_set(&local_err
)) {
784 error_propagate(err
, local_err
);
788 QTAILQ_FOREACH(mount
, &mounts
, next
) {
790 fd
= qemu_open(mount
->dirname
, O_RDONLY
);
794 /* we have no way of knowing whether a filesystem was actually unfrozen
795 * as a result of a successful call to FITHAW, only that if an error
796 * was returned the filesystem was *not* unfrozen by that particular
799 * since multiple preceding FIFREEZEs require multiple calls to FITHAW
800 * to unfreeze, continuing issuing FITHAW until an error is returned,
801 * in which case either the filesystem is in an unfreezable state, or,
802 * more likely, it was thawed previously (and remains so afterward).
804 * also, since the most recent successful call is the one that did
805 * the actual unfreeze, we can use this to provide an accurate count
806 * of the number of filesystems unfrozen by guest-fsfreeze-thaw, which
807 * may * be useful for determining whether a filesystem was unfrozen
808 * during the freeze/thaw phase by a process other than qemu-ga.
811 ret
= ioctl(fd
, FITHAW
);
812 if (ret
== 0 && !logged
) {
820 ga_unset_frozen(ga_state
);
821 free_fs_mount_list(&mounts
);
823 execute_fsfreeze_hook(FSFREEZE_HOOK_THAW
, err
);
828 static void guest_fsfreeze_cleanup(void)
832 if (ga_is_frozen(ga_state
) == GUEST_FSFREEZE_STATUS_FROZEN
) {
833 qmp_guest_fsfreeze_thaw(&err
);
835 slog("failed to clean up frozen filesystems: %s",
836 error_get_pretty(err
));
841 #endif /* CONFIG_FSFREEZE */
843 #if defined(CONFIG_FSTRIM)
845 * Walk list of mounted file systems in the guest, and trim them.
847 void qmp_guest_fstrim(bool has_minimum
, int64_t minimum
, Error
**err
)
851 struct FsMount
*mount
;
853 Error
*local_err
= NULL
;
854 struct fstrim_range r
= {
857 .minlen
= has_minimum
? minimum
: 0,
860 slog("guest-fstrim called");
862 QTAILQ_INIT(&mounts
);
863 build_fs_mount_list(&mounts
, &local_err
);
864 if (error_is_set(&local_err
)) {
865 error_propagate(err
, local_err
);
869 QTAILQ_FOREACH(mount
, &mounts
, next
) {
870 fd
= qemu_open(mount
->dirname
, O_RDONLY
);
872 error_setg_errno(err
, errno
, "failed to open %s", mount
->dirname
);
876 /* We try to cull filesytems we know won't work in advance, but other
877 * filesytems may not implement fstrim for less obvious reasons. These
878 * will report EOPNOTSUPP; we simply ignore these errors. Any other
879 * error means an unexpected error, so return it in those cases. In
880 * some other cases ENOTTY will be reported (e.g. CD-ROMs).
882 ret
= ioctl(fd
, FITRIM
, &r
);
884 if (errno
!= ENOTTY
&& errno
!= EOPNOTSUPP
) {
885 error_setg_errno(err
, errno
, "failed to trim %s",
895 free_fs_mount_list(&mounts
);
897 #endif /* CONFIG_FSTRIM */
900 #define LINUX_SYS_STATE_FILE "/sys/power/state"
901 #define SUSPEND_SUPPORTED 0
902 #define SUSPEND_NOT_SUPPORTED 1
904 static void bios_supports_mode(const char *pmutils_bin
, const char *pmutils_arg
,
905 const char *sysfile_str
, Error
**err
)
907 Error
*local_err
= NULL
;
912 pmutils_path
= g_find_program_in_path(pmutils_bin
);
916 char buf
[32]; /* hopefully big enough */
921 reopen_fd_to_null(0);
922 reopen_fd_to_null(1);
923 reopen_fd_to_null(2);
926 execle(pmutils_path
, pmutils_bin
, pmutils_arg
, NULL
, environ
);
930 * If we get here either pm-utils is not installed or execle() has
931 * failed. Let's try the manual method if the caller wants it.
935 _exit(SUSPEND_NOT_SUPPORTED
);
938 fd
= open(LINUX_SYS_STATE_FILE
, O_RDONLY
);
940 _exit(SUSPEND_NOT_SUPPORTED
);
943 ret
= read(fd
, buf
, sizeof(buf
)-1);
945 _exit(SUSPEND_NOT_SUPPORTED
);
949 if (strstr(buf
, sysfile_str
)) {
950 _exit(SUSPEND_SUPPORTED
);
953 _exit(SUSPEND_NOT_SUPPORTED
);
954 } else if (pid
< 0) {
955 error_setg_errno(err
, errno
, "failed to create child process");
959 ga_wait_child(pid
, &status
, &local_err
);
960 if (error_is_set(&local_err
)) {
961 error_propagate(err
, local_err
);
965 if (!WIFEXITED(status
)) {
966 error_setg(err
, "child process has terminated abnormally");
970 switch (WEXITSTATUS(status
)) {
971 case SUSPEND_SUPPORTED
:
973 case SUSPEND_NOT_SUPPORTED
:
975 "the requested suspend mode is not supported by the guest");
979 "the helper program '%s' returned an unexpected exit status"
980 " code (%d)", pmutils_path
, WEXITSTATUS(status
));
985 g_free(pmutils_path
);
988 static void guest_suspend(const char *pmutils_bin
, const char *sysfile_str
,
991 Error
*local_err
= NULL
;
996 pmutils_path
= g_find_program_in_path(pmutils_bin
);
1004 reopen_fd_to_null(0);
1005 reopen_fd_to_null(1);
1006 reopen_fd_to_null(2);
1009 execle(pmutils_path
, pmutils_bin
, NULL
, environ
);
1013 * If we get here either pm-utils is not installed or execle() has
1014 * failed. Let's try the manual method if the caller wants it.
1018 _exit(EXIT_FAILURE
);
1021 fd
= open(LINUX_SYS_STATE_FILE
, O_WRONLY
);
1023 _exit(EXIT_FAILURE
);
1026 if (write(fd
, sysfile_str
, strlen(sysfile_str
)) < 0) {
1027 _exit(EXIT_FAILURE
);
1030 _exit(EXIT_SUCCESS
);
1031 } else if (pid
< 0) {
1032 error_setg_errno(err
, errno
, "failed to create child process");
1036 ga_wait_child(pid
, &status
, &local_err
);
1037 if (error_is_set(&local_err
)) {
1038 error_propagate(err
, local_err
);
1042 if (!WIFEXITED(status
)) {
1043 error_setg(err
, "child process has terminated abnormally");
1047 if (WEXITSTATUS(status
)) {
1048 error_setg(err
, "child process has failed to suspend");
1053 g_free(pmutils_path
);
1056 void qmp_guest_suspend_disk(Error
**err
)
1058 bios_supports_mode("pm-is-supported", "--hibernate", "disk", err
);
1059 if (error_is_set(err
)) {
1063 guest_suspend("pm-hibernate", "disk", err
);
1066 void qmp_guest_suspend_ram(Error
**err
)
1068 bios_supports_mode("pm-is-supported", "--suspend", "mem", err
);
1069 if (error_is_set(err
)) {
1073 guest_suspend("pm-suspend", "mem", err
);
1076 void qmp_guest_suspend_hybrid(Error
**err
)
1078 bios_supports_mode("pm-is-supported", "--suspend-hybrid", NULL
, err
);
1079 if (error_is_set(err
)) {
1083 guest_suspend("pm-suspend-hybrid", NULL
, err
);
1086 static GuestNetworkInterfaceList
*
1087 guest_find_interface(GuestNetworkInterfaceList
*head
,
1090 for (; head
; head
= head
->next
) {
1091 if (strcmp(head
->value
->name
, name
) == 0) {
1100 * Build information about guest interfaces
1102 GuestNetworkInterfaceList
*qmp_guest_network_get_interfaces(Error
**errp
)
1104 GuestNetworkInterfaceList
*head
= NULL
, *cur_item
= NULL
;
1105 struct ifaddrs
*ifap
, *ifa
;
1107 if (getifaddrs(&ifap
) < 0) {
1108 error_setg_errno(errp
, errno
, "getifaddrs failed");
1112 for (ifa
= ifap
; ifa
; ifa
= ifa
->ifa_next
) {
1113 GuestNetworkInterfaceList
*info
;
1114 GuestIpAddressList
**address_list
= NULL
, *address_item
= NULL
;
1115 char addr4
[INET_ADDRSTRLEN
];
1116 char addr6
[INET6_ADDRSTRLEN
];
1119 unsigned char *mac_addr
;
1122 g_debug("Processing %s interface", ifa
->ifa_name
);
1124 info
= guest_find_interface(head
, ifa
->ifa_name
);
1127 info
= g_malloc0(sizeof(*info
));
1128 info
->value
= g_malloc0(sizeof(*info
->value
));
1129 info
->value
->name
= g_strdup(ifa
->ifa_name
);
1132 head
= cur_item
= info
;
1134 cur_item
->next
= info
;
1139 if (!info
->value
->has_hardware_address
&&
1140 ifa
->ifa_flags
& SIOCGIFHWADDR
) {
1141 /* we haven't obtained HW address yet */
1142 sock
= socket(PF_INET
, SOCK_STREAM
, 0);
1144 error_setg_errno(errp
, errno
, "failed to create socket");
1148 memset(&ifr
, 0, sizeof(ifr
));
1149 pstrcpy(ifr
.ifr_name
, IF_NAMESIZE
, info
->value
->name
);
1150 if (ioctl(sock
, SIOCGIFHWADDR
, &ifr
) == -1) {
1151 error_setg_errno(errp
, errno
,
1152 "failed to get MAC address of %s",
1159 mac_addr
= (unsigned char *) &ifr
.ifr_hwaddr
.sa_data
;
1161 info
->value
->hardware_address
=
1162 g_strdup_printf("%02x:%02x:%02x:%02x:%02x:%02x",
1163 (int) mac_addr
[0], (int) mac_addr
[1],
1164 (int) mac_addr
[2], (int) mac_addr
[3],
1165 (int) mac_addr
[4], (int) mac_addr
[5]);
1167 info
->value
->has_hardware_address
= true;
1170 if (ifa
->ifa_addr
&&
1171 ifa
->ifa_addr
->sa_family
== AF_INET
) {
1172 /* interface with IPv4 address */
1173 p
= &((struct sockaddr_in
*)ifa
->ifa_addr
)->sin_addr
;
1174 if (!inet_ntop(AF_INET
, p
, addr4
, sizeof(addr4
))) {
1175 error_setg_errno(errp
, errno
, "inet_ntop failed");
1179 address_item
= g_malloc0(sizeof(*address_item
));
1180 address_item
->value
= g_malloc0(sizeof(*address_item
->value
));
1181 address_item
->value
->ip_address
= g_strdup(addr4
);
1182 address_item
->value
->ip_address_type
= GUEST_IP_ADDRESS_TYPE_IPV4
;
1184 if (ifa
->ifa_netmask
) {
1185 /* Count the number of set bits in netmask.
1186 * This is safe as '1' and '0' cannot be shuffled in netmask. */
1187 p
= &((struct sockaddr_in
*)ifa
->ifa_netmask
)->sin_addr
;
1188 address_item
->value
->prefix
= ctpop32(((uint32_t *) p
)[0]);
1190 } else if (ifa
->ifa_addr
&&
1191 ifa
->ifa_addr
->sa_family
== AF_INET6
) {
1192 /* interface with IPv6 address */
1193 p
= &((struct sockaddr_in6
*)ifa
->ifa_addr
)->sin6_addr
;
1194 if (!inet_ntop(AF_INET6
, p
, addr6
, sizeof(addr6
))) {
1195 error_setg_errno(errp
, errno
, "inet_ntop failed");
1199 address_item
= g_malloc0(sizeof(*address_item
));
1200 address_item
->value
= g_malloc0(sizeof(*address_item
->value
));
1201 address_item
->value
->ip_address
= g_strdup(addr6
);
1202 address_item
->value
->ip_address_type
= GUEST_IP_ADDRESS_TYPE_IPV6
;
1204 if (ifa
->ifa_netmask
) {
1205 /* Count the number of set bits in netmask.
1206 * This is safe as '1' and '0' cannot be shuffled in netmask. */
1207 p
= &((struct sockaddr_in6
*)ifa
->ifa_netmask
)->sin6_addr
;
1208 address_item
->value
->prefix
=
1209 ctpop32(((uint32_t *) p
)[0]) +
1210 ctpop32(((uint32_t *) p
)[1]) +
1211 ctpop32(((uint32_t *) p
)[2]) +
1212 ctpop32(((uint32_t *) p
)[3]);
1216 if (!address_item
) {
1220 address_list
= &info
->value
->ip_addresses
;
1222 while (*address_list
&& (*address_list
)->next
) {
1223 address_list
= &(*address_list
)->next
;
1226 if (!*address_list
) {
1227 *address_list
= address_item
;
1229 (*address_list
)->next
= address_item
;
1232 info
->value
->has_ip_addresses
= true;
1242 qapi_free_GuestNetworkInterfaceList(head
);
1246 #define SYSCONF_EXACT(name, err) sysconf_exact((name), #name, (err))
1248 static long sysconf_exact(int name
, const char *name_str
, Error
**err
)
1253 ret
= sysconf(name
);
1256 error_setg(err
, "sysconf(%s): value indefinite", name_str
);
1258 error_setg_errno(err
, errno
, "sysconf(%s)", name_str
);
1264 /* Transfer online/offline status between @vcpu and the guest system.
1266 * On input either @errp or *@errp must be NULL.
1268 * In system-to-@vcpu direction, the following @vcpu fields are accessed:
1269 * - R: vcpu->logical_id
1271 * - W: vcpu->can_offline
1273 * In @vcpu-to-system direction, the following @vcpu fields are accessed:
1274 * - R: vcpu->logical_id
1277 * Written members remain unmodified on error.
1279 static void transfer_vcpu(GuestLogicalProcessor
*vcpu
, bool sys2vcpu
,
1285 dirpath
= g_strdup_printf("/sys/devices/system/cpu/cpu%" PRId64
"/",
1287 dirfd
= open(dirpath
, O_RDONLY
| O_DIRECTORY
);
1289 error_setg_errno(errp
, errno
, "open(\"%s\")", dirpath
);
1291 static const char fn
[] = "online";
1295 fd
= openat(dirfd
, fn
, sys2vcpu
? O_RDONLY
: O_RDWR
);
1297 if (errno
!= ENOENT
) {
1298 error_setg_errno(errp
, errno
, "open(\"%s/%s\")", dirpath
, fn
);
1299 } else if (sys2vcpu
) {
1300 vcpu
->online
= true;
1301 vcpu
->can_offline
= false;
1302 } else if (!vcpu
->online
) {
1303 error_setg(errp
, "logical processor #%" PRId64
" can't be "
1304 "offlined", vcpu
->logical_id
);
1305 } /* otherwise pretend successful re-onlining */
1307 unsigned char status
;
1309 res
= pread(fd
, &status
, 1, 0);
1311 error_setg_errno(errp
, errno
, "pread(\"%s/%s\")", dirpath
, fn
);
1312 } else if (res
== 0) {
1313 error_setg(errp
, "pread(\"%s/%s\"): unexpected EOF", dirpath
,
1315 } else if (sys2vcpu
) {
1316 vcpu
->online
= (status
!= '0');
1317 vcpu
->can_offline
= true;
1318 } else if (vcpu
->online
!= (status
!= '0')) {
1319 status
= '0' + vcpu
->online
;
1320 if (pwrite(fd
, &status
, 1, 0) == -1) {
1321 error_setg_errno(errp
, errno
, "pwrite(\"%s/%s\")", dirpath
,
1324 } /* otherwise pretend successful re-(on|off)-lining */
1337 GuestLogicalProcessorList
*qmp_guest_get_vcpus(Error
**errp
)
1340 GuestLogicalProcessorList
*head
, **link
;
1342 Error
*local_err
= NULL
;
1347 sc_max
= SYSCONF_EXACT(_SC_NPROCESSORS_CONF
, &local_err
);
1349 while (local_err
== NULL
&& current
< sc_max
) {
1350 GuestLogicalProcessor
*vcpu
;
1351 GuestLogicalProcessorList
*entry
;
1353 vcpu
= g_malloc0(sizeof *vcpu
);
1354 vcpu
->logical_id
= current
++;
1355 vcpu
->has_can_offline
= true; /* lolspeak ftw */
1356 transfer_vcpu(vcpu
, true, &local_err
);
1358 entry
= g_malloc0(sizeof *entry
);
1359 entry
->value
= vcpu
;
1362 link
= &entry
->next
;
1365 if (local_err
== NULL
) {
1366 /* there's no guest with zero VCPUs */
1367 g_assert(head
!= NULL
);
1371 qapi_free_GuestLogicalProcessorList(head
);
1372 error_propagate(errp
, local_err
);
1376 int64_t qmp_guest_set_vcpus(GuestLogicalProcessorList
*vcpus
, Error
**errp
)
1379 Error
*local_err
= NULL
;
1382 while (vcpus
!= NULL
) {
1383 transfer_vcpu(vcpus
->value
, false, &local_err
);
1384 if (local_err
!= NULL
) {
1388 vcpus
= vcpus
->next
;
1391 if (local_err
!= NULL
) {
1392 if (processed
== 0) {
1393 error_propagate(errp
, local_err
);
1395 error_free(local_err
);
1402 #else /* defined(__linux__) */
1404 void qmp_guest_suspend_disk(Error
**err
)
1406 error_set(err
, QERR_UNSUPPORTED
);
1409 void qmp_guest_suspend_ram(Error
**err
)
1411 error_set(err
, QERR_UNSUPPORTED
);
1414 void qmp_guest_suspend_hybrid(Error
**err
)
1416 error_set(err
, QERR_UNSUPPORTED
);
1419 GuestNetworkInterfaceList
*qmp_guest_network_get_interfaces(Error
**errp
)
1421 error_set(errp
, QERR_UNSUPPORTED
);
1425 GuestLogicalProcessorList
*qmp_guest_get_vcpus(Error
**errp
)
1427 error_set(errp
, QERR_UNSUPPORTED
);
1431 int64_t qmp_guest_set_vcpus(GuestLogicalProcessorList
*vcpus
, Error
**errp
)
1433 error_set(errp
, QERR_UNSUPPORTED
);
1439 #if !defined(CONFIG_FSFREEZE)
1441 GuestFsfreezeStatus
qmp_guest_fsfreeze_status(Error
**err
)
1443 error_set(err
, QERR_UNSUPPORTED
);
1448 int64_t qmp_guest_fsfreeze_freeze(Error
**err
)
1450 error_set(err
, QERR_UNSUPPORTED
);
1455 int64_t qmp_guest_fsfreeze_thaw(Error
**err
)
1457 error_set(err
, QERR_UNSUPPORTED
);
1461 #endif /* CONFIG_FSFREEZE */
1463 #if !defined(CONFIG_FSTRIM)
1464 void qmp_guest_fstrim(bool has_minimum
, int64_t minimum
, Error
**err
)
1466 error_set(err
, QERR_UNSUPPORTED
);
1470 /* register init/cleanup routines for stateful command groups */
1471 void ga_command_state_init(GAState
*s
, GACommandState
*cs
)
1473 #if defined(CONFIG_FSFREEZE)
1474 ga_command_state_add(cs
, NULL
, guest_fsfreeze_cleanup
);
1476 ga_command_state_add(cs
, guest_file_init
, NULL
);