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
**errp
)
63 rpid
= waitpid(pid
, status
, 0);
64 } while (rpid
== -1 && errno
== EINTR
);
67 error_setg_errno(errp
, errno
, "failed to wait for child (pid: %d)",
72 g_assert(rpid
== pid
);
75 void qmp_guest_shutdown(bool has_mode
, const char *mode
, Error
**errp
)
77 const char *shutdown_flag
;
78 Error
*local_err
= NULL
;
82 slog("guest-shutdown called, mode: %s", mode
);
83 if (!has_mode
|| strcmp(mode
, "powerdown") == 0) {
85 } else if (strcmp(mode
, "halt") == 0) {
87 } else if (strcmp(mode
, "reboot") == 0) {
91 "mode is invalid (valid values are: halt|powerdown|reboot");
97 /* child, start the shutdown */
100 reopen_fd_to_null(1);
101 reopen_fd_to_null(2);
103 execle("/sbin/shutdown", "shutdown", "-h", shutdown_flag
, "+0",
104 "hypervisor initiated shutdown", (char*)NULL
, environ
);
106 } else if (pid
< 0) {
107 error_setg_errno(errp
, errno
, "failed to create child process");
111 ga_wait_child(pid
, &status
, &local_err
);
113 error_propagate(errp
, local_err
);
117 if (!WIFEXITED(status
)) {
118 error_setg(errp
, "child process has terminated abnormally");
122 if (WEXITSTATUS(status
)) {
123 error_setg(errp
, "child process has failed to shutdown");
130 int64_t qmp_guest_get_time(Error
**errp
)
136 ret
= qemu_gettimeofday(&tq
);
138 error_setg_errno(errp
, errno
, "Failed to get time");
142 time_ns
= tq
.tv_sec
* 1000000000LL + tq
.tv_usec
* 1000;
146 void qmp_guest_set_time(bool has_time
, int64_t time_ns
, Error
**errp
)
151 Error
*local_err
= NULL
;
154 /* If user has passed a time, validate and set it. */
156 /* year-2038 will overflow in case time_t is 32bit */
157 if (time_ns
/ 1000000000 != (time_t)(time_ns
/ 1000000000)) {
158 error_setg(errp
, "Time %" PRId64
" is too large", time_ns
);
162 tv
.tv_sec
= time_ns
/ 1000000000;
163 tv
.tv_usec
= (time_ns
% 1000000000) / 1000;
165 ret
= settimeofday(&tv
, NULL
);
167 error_setg_errno(errp
, errno
, "Failed to set time to guest");
172 /* Now, if user has passed a time to set and the system time is set, we
173 * just need to synchronize the hardware clock. However, if no time was
174 * passed, user is requesting the opposite: set the system time from the
175 * hardware clock (RTC). */
179 reopen_fd_to_null(0);
180 reopen_fd_to_null(1);
181 reopen_fd_to_null(2);
183 /* Use '/sbin/hwclock -w' to set RTC from the system time,
184 * or '/sbin/hwclock -s' to set the system time from RTC. */
185 execle("/sbin/hwclock", "hwclock", has_time
? "-w" : "-s",
188 } else if (pid
< 0) {
189 error_setg_errno(errp
, errno
, "failed to create child process");
193 ga_wait_child(pid
, &status
, &local_err
);
195 error_propagate(errp
, local_err
);
199 if (!WIFEXITED(status
)) {
200 error_setg(errp
, "child process has terminated abnormally");
204 if (WEXITSTATUS(status
)) {
205 error_setg(errp
, "hwclock failed to set hardware clock to system time");
210 typedef struct GuestFileHandle
{
213 QTAILQ_ENTRY(GuestFileHandle
) next
;
217 QTAILQ_HEAD(, GuestFileHandle
) filehandles
;
220 static int64_t guest_file_handle_add(FILE *fh
, Error
**errp
)
222 GuestFileHandle
*gfh
;
225 handle
= ga_get_fd_handle(ga_state
, errp
);
230 gfh
= g_malloc0(sizeof(GuestFileHandle
));
233 QTAILQ_INSERT_TAIL(&guest_file_state
.filehandles
, gfh
, next
);
238 static GuestFileHandle
*guest_file_handle_find(int64_t id
, Error
**errp
)
240 GuestFileHandle
*gfh
;
242 QTAILQ_FOREACH(gfh
, &guest_file_state
.filehandles
, next
)
249 error_setg(errp
, "handle '%" PRId64
"' has not been found", id
);
253 typedef const char * const ccpc
;
259 /* http://pubs.opengroup.org/onlinepubs/9699919799/functions/fopen.html */
260 static const struct {
263 } guest_file_open_modes
[] = {
264 { (ccpc
[]){ "r", NULL
}, O_RDONLY
},
265 { (ccpc
[]){ "rb", NULL
}, O_RDONLY
| O_BINARY
},
266 { (ccpc
[]){ "w", NULL
}, O_WRONLY
| O_CREAT
| O_TRUNC
},
267 { (ccpc
[]){ "wb", NULL
}, O_WRONLY
| O_CREAT
| O_TRUNC
| O_BINARY
},
268 { (ccpc
[]){ "a", NULL
}, O_WRONLY
| O_CREAT
| O_APPEND
},
269 { (ccpc
[]){ "ab", NULL
}, O_WRONLY
| O_CREAT
| O_APPEND
| O_BINARY
},
270 { (ccpc
[]){ "r+", NULL
}, O_RDWR
},
271 { (ccpc
[]){ "rb+", "r+b", NULL
}, O_RDWR
| O_BINARY
},
272 { (ccpc
[]){ "w+", NULL
}, O_RDWR
| O_CREAT
| O_TRUNC
},
273 { (ccpc
[]){ "wb+", "w+b", NULL
}, O_RDWR
| O_CREAT
| O_TRUNC
| O_BINARY
},
274 { (ccpc
[]){ "a+", NULL
}, O_RDWR
| O_CREAT
| O_APPEND
},
275 { (ccpc
[]){ "ab+", "a+b", NULL
}, O_RDWR
| O_CREAT
| O_APPEND
| O_BINARY
}
279 find_open_flag(const char *mode_str
, Error
**errp
)
283 for (mode
= 0; mode
< ARRAY_SIZE(guest_file_open_modes
); ++mode
) {
286 form
= guest_file_open_modes
[mode
].forms
;
287 while (*form
!= NULL
&& strcmp(*form
, mode_str
) != 0) {
295 if (mode
== ARRAY_SIZE(guest_file_open_modes
)) {
296 error_setg(errp
, "invalid file open mode '%s'", mode_str
);
299 return guest_file_open_modes
[mode
].oflag_base
| O_NOCTTY
| O_NONBLOCK
;
302 #define DEFAULT_NEW_FILE_MODE (S_IRUSR | S_IWUSR | \
303 S_IRGRP | S_IWGRP | \
307 safe_open_or_create(const char *path
, const char *mode
, Error
**errp
)
309 Error
*local_err
= NULL
;
312 oflag
= find_open_flag(mode
, &local_err
);
313 if (local_err
== NULL
) {
316 /* If the caller wants / allows creation of a new file, we implement it
317 * with a two step process: open() + (open() / fchmod()).
319 * First we insist on creating the file exclusively as a new file. If
320 * that succeeds, we're free to set any file-mode bits on it. (The
321 * motivation is that we want to set those file-mode bits independently
322 * of the current umask.)
324 * If the exclusive creation fails because the file already exists
325 * (EEXIST is not possible for any other reason), we just attempt to
326 * open the file, but in this case we won't be allowed to change the
327 * file-mode bits on the preexistent file.
329 * The pathname should never disappear between the two open()s in
330 * practice. If it happens, then someone very likely tried to race us.
331 * In this case just go ahead and report the ENOENT from the second
332 * open() to the caller.
334 * If the caller wants to open a preexistent file, then the first
335 * open() is decisive and its third argument is ignored, and the second
336 * open() and the fchmod() are never called.
338 fd
= open(path
, oflag
| ((oflag
& O_CREAT
) ? O_EXCL
: 0), 0);
339 if (fd
== -1 && errno
== EEXIST
) {
340 oflag
&= ~(unsigned)O_CREAT
;
341 fd
= open(path
, oflag
);
345 error_setg_errno(&local_err
, errno
, "failed to open file '%s' "
346 "(mode: '%s')", path
, mode
);
348 qemu_set_cloexec(fd
);
350 if ((oflag
& O_CREAT
) && fchmod(fd
, DEFAULT_NEW_FILE_MODE
) == -1) {
351 error_setg_errno(&local_err
, errno
, "failed to set permission "
352 "0%03o on new file '%s' (mode: '%s')",
353 (unsigned)DEFAULT_NEW_FILE_MODE
, path
, mode
);
357 f
= fdopen(fd
, mode
);
359 error_setg_errno(&local_err
, errno
, "failed to associate "
360 "stdio stream with file descriptor %d, "
361 "file '%s' (mode: '%s')", fd
, path
, mode
);
368 if (oflag
& O_CREAT
) {
374 error_propagate(errp
, local_err
);
378 int64_t qmp_guest_file_open(const char *path
, bool has_mode
, const char *mode
,
382 Error
*local_err
= NULL
;
384 int64_t ret
= -1, handle
;
389 slog("guest-file-open called, filepath: %s, mode: %s", path
, mode
);
390 fh
= safe_open_or_create(path
, mode
, &local_err
);
391 if (local_err
!= NULL
) {
392 error_propagate(errp
, local_err
);
396 /* set fd non-blocking to avoid common use cases (like reading from a
397 * named pipe) from hanging the agent
400 ret
= fcntl(fd
, F_GETFL
);
401 ret
= fcntl(fd
, F_SETFL
, ret
| O_NONBLOCK
);
403 error_setg_errno(errp
, errno
, "failed to make file '%s' non-blocking",
409 handle
= guest_file_handle_add(fh
, errp
);
415 slog("guest-file-open, handle: %" PRId64
, handle
);
419 void qmp_guest_file_close(int64_t handle
, Error
**errp
)
421 GuestFileHandle
*gfh
= guest_file_handle_find(handle
, errp
);
424 slog("guest-file-close called, handle: %" PRId64
, handle
);
429 ret
= fclose(gfh
->fh
);
431 error_setg_errno(errp
, errno
, "failed to close handle");
435 QTAILQ_REMOVE(&guest_file_state
.filehandles
, gfh
, next
);
439 struct GuestFileRead
*qmp_guest_file_read(int64_t handle
, bool has_count
,
440 int64_t count
, Error
**errp
)
442 GuestFileHandle
*gfh
= guest_file_handle_find(handle
, errp
);
443 GuestFileRead
*read_data
= NULL
;
453 count
= QGA_READ_COUNT_DEFAULT
;
454 } else if (count
< 0) {
455 error_setg(errp
, "value '%" PRId64
"' is invalid for argument count",
461 buf
= g_malloc0(count
+1);
462 read_count
= fread(buf
, 1, count
, fh
);
464 error_setg_errno(errp
, errno
, "failed to read file");
465 slog("guest-file-read failed, handle: %" PRId64
, handle
);
468 read_data
= g_malloc0(sizeof(GuestFileRead
));
469 read_data
->count
= read_count
;
470 read_data
->eof
= feof(fh
);
472 read_data
->buf_b64
= g_base64_encode(buf
, read_count
);
481 GuestFileWrite
*qmp_guest_file_write(int64_t handle
, const char *buf_b64
,
482 bool has_count
, int64_t count
,
485 GuestFileWrite
*write_data
= NULL
;
489 GuestFileHandle
*gfh
= guest_file_handle_find(handle
, errp
);
497 buf
= g_base64_decode(buf_b64
, &buf_len
);
501 } else if (count
< 0 || count
> buf_len
) {
502 error_setg(errp
, "value '%" PRId64
"' is invalid for argument count",
508 write_count
= fwrite(buf
, 1, count
, fh
);
510 error_setg_errno(errp
, errno
, "failed to write to file");
511 slog("guest-file-write failed, handle: %" PRId64
, handle
);
513 write_data
= g_malloc0(sizeof(GuestFileWrite
));
514 write_data
->count
= write_count
;
515 write_data
->eof
= feof(fh
);
523 struct GuestFileSeek
*qmp_guest_file_seek(int64_t handle
, int64_t offset
,
524 int64_t whence
, Error
**errp
)
526 GuestFileHandle
*gfh
= guest_file_handle_find(handle
, errp
);
527 GuestFileSeek
*seek_data
= NULL
;
536 ret
= fseek(fh
, offset
, whence
);
538 error_setg_errno(errp
, errno
, "failed to seek file");
540 seek_data
= g_new0(GuestFileSeek
, 1);
541 seek_data
->position
= ftell(fh
);
542 seek_data
->eof
= feof(fh
);
549 void qmp_guest_file_flush(int64_t handle
, Error
**errp
)
551 GuestFileHandle
*gfh
= guest_file_handle_find(handle
, errp
);
562 error_setg_errno(errp
, errno
, "failed to flush file");
566 static void guest_file_init(void)
568 QTAILQ_INIT(&guest_file_state
.filehandles
);
571 /* linux-specific implementations. avoid this if at all possible. */
572 #if defined(__linux__)
574 #if defined(CONFIG_FSFREEZE) || defined(CONFIG_FSTRIM)
575 typedef struct FsMount
{
578 QTAILQ_ENTRY(FsMount
) next
;
581 typedef QTAILQ_HEAD(FsMountList
, FsMount
) FsMountList
;
583 static void free_fs_mount_list(FsMountList
*mounts
)
585 FsMount
*mount
, *temp
;
591 QTAILQ_FOREACH_SAFE(mount
, mounts
, next
, temp
) {
592 QTAILQ_REMOVE(mounts
, mount
, next
);
593 g_free(mount
->dirname
);
594 g_free(mount
->devtype
);
600 * Walk the mount table and build a list of local file systems
602 static void build_fs_mount_list(FsMountList
*mounts
, Error
**errp
)
606 char const *mtab
= "/proc/self/mounts";
609 fp
= setmntent(mtab
, "r");
611 error_setg(errp
, "failed to open mtab file: '%s'", mtab
);
615 while ((ment
= getmntent(fp
))) {
617 * An entry which device name doesn't start with a '/' is
618 * either a dummy file system or a network file system.
619 * Add special handling for smbfs and cifs as is done by
622 if ((ment
->mnt_fsname
[0] != '/') ||
623 (strcmp(ment
->mnt_type
, "smbfs") == 0) ||
624 (strcmp(ment
->mnt_type
, "cifs") == 0)) {
628 mount
= g_malloc0(sizeof(FsMount
));
629 mount
->dirname
= g_strdup(ment
->mnt_dir
);
630 mount
->devtype
= g_strdup(ment
->mnt_type
);
632 QTAILQ_INSERT_TAIL(mounts
, mount
, next
);
639 #if defined(CONFIG_FSFREEZE)
642 FSFREEZE_HOOK_THAW
= 0,
643 FSFREEZE_HOOK_FREEZE
,
646 const char *fsfreeze_hook_arg_string
[] = {
651 static void execute_fsfreeze_hook(FsfreezeHookArg arg
, Error
**errp
)
656 const char *arg_str
= fsfreeze_hook_arg_string
[arg
];
657 Error
*local_err
= NULL
;
659 hook
= ga_fsfreeze_hook(ga_state
);
663 if (access(hook
, X_OK
) != 0) {
664 error_setg_errno(errp
, errno
, "can't access fsfreeze hook '%s'", hook
);
668 slog("executing fsfreeze hook with arg '%s'", arg_str
);
672 reopen_fd_to_null(0);
673 reopen_fd_to_null(1);
674 reopen_fd_to_null(2);
676 execle(hook
, hook
, arg_str
, NULL
, environ
);
678 } else if (pid
< 0) {
679 error_setg_errno(errp
, errno
, "failed to create child process");
683 ga_wait_child(pid
, &status
, &local_err
);
685 error_propagate(errp
, local_err
);
689 if (!WIFEXITED(status
)) {
690 error_setg(errp
, "fsfreeze hook has terminated abnormally");
694 status
= WEXITSTATUS(status
);
696 error_setg(errp
, "fsfreeze hook has failed with status %d", status
);
702 * Return status of freeze/thaw
704 GuestFsfreezeStatus
qmp_guest_fsfreeze_status(Error
**errp
)
706 if (ga_is_frozen(ga_state
)) {
707 return GUEST_FSFREEZE_STATUS_FROZEN
;
710 return GUEST_FSFREEZE_STATUS_THAWED
;
714 * Walk list of mounted file systems in the guest, and freeze the ones which
715 * are real local file systems.
717 int64_t qmp_guest_fsfreeze_freeze(Error
**errp
)
721 struct FsMount
*mount
;
722 Error
*local_err
= NULL
;
725 slog("guest-fsfreeze called");
727 execute_fsfreeze_hook(FSFREEZE_HOOK_FREEZE
, &local_err
);
729 error_propagate(errp
, local_err
);
733 QTAILQ_INIT(&mounts
);
734 build_fs_mount_list(&mounts
, &local_err
);
736 error_propagate(errp
, local_err
);
740 /* cannot risk guest agent blocking itself on a write in this state */
741 ga_set_frozen(ga_state
);
743 QTAILQ_FOREACH_REVERSE(mount
, &mounts
, FsMountList
, next
) {
744 fd
= qemu_open(mount
->dirname
, O_RDONLY
);
746 error_setg_errno(errp
, errno
, "failed to open %s", mount
->dirname
);
750 /* we try to cull filesytems we know won't work in advance, but other
751 * filesytems may not implement fsfreeze for less obvious reasons.
752 * these will report EOPNOTSUPP. we simply ignore these when tallying
753 * the number of frozen filesystems.
755 * any other error means a failure to freeze a filesystem we
756 * expect to be freezable, so return an error in those cases
757 * and return system to thawed state.
759 ret
= ioctl(fd
, FIFREEZE
);
761 if (errno
!= EOPNOTSUPP
) {
762 error_setg_errno(errp
, errno
, "failed to freeze %s",
773 free_fs_mount_list(&mounts
);
777 free_fs_mount_list(&mounts
);
778 qmp_guest_fsfreeze_thaw(NULL
);
783 * Walk list of frozen file systems in the guest, and thaw them.
785 int64_t qmp_guest_fsfreeze_thaw(Error
**errp
)
790 int fd
, i
= 0, logged
;
791 Error
*local_err
= NULL
;
793 QTAILQ_INIT(&mounts
);
794 build_fs_mount_list(&mounts
, &local_err
);
796 error_propagate(errp
, local_err
);
800 QTAILQ_FOREACH(mount
, &mounts
, next
) {
802 fd
= qemu_open(mount
->dirname
, O_RDONLY
);
806 /* we have no way of knowing whether a filesystem was actually unfrozen
807 * as a result of a successful call to FITHAW, only that if an error
808 * was returned the filesystem was *not* unfrozen by that particular
811 * since multiple preceding FIFREEZEs require multiple calls to FITHAW
812 * to unfreeze, continuing issuing FITHAW until an error is returned,
813 * in which case either the filesystem is in an unfreezable state, or,
814 * more likely, it was thawed previously (and remains so afterward).
816 * also, since the most recent successful call is the one that did
817 * the actual unfreeze, we can use this to provide an accurate count
818 * of the number of filesystems unfrozen by guest-fsfreeze-thaw, which
819 * may * be useful for determining whether a filesystem was unfrozen
820 * during the freeze/thaw phase by a process other than qemu-ga.
823 ret
= ioctl(fd
, FITHAW
);
824 if (ret
== 0 && !logged
) {
832 ga_unset_frozen(ga_state
);
833 free_fs_mount_list(&mounts
);
835 execute_fsfreeze_hook(FSFREEZE_HOOK_THAW
, errp
);
840 static void guest_fsfreeze_cleanup(void)
844 if (ga_is_frozen(ga_state
) == GUEST_FSFREEZE_STATUS_FROZEN
) {
845 qmp_guest_fsfreeze_thaw(&err
);
847 slog("failed to clean up frozen filesystems: %s",
848 error_get_pretty(err
));
853 #endif /* CONFIG_FSFREEZE */
855 #if defined(CONFIG_FSTRIM)
857 * Walk list of mounted file systems in the guest, and trim them.
859 void qmp_guest_fstrim(bool has_minimum
, int64_t minimum
, Error
**errp
)
863 struct FsMount
*mount
;
865 Error
*local_err
= NULL
;
866 struct fstrim_range r
= {
869 .minlen
= has_minimum
? minimum
: 0,
872 slog("guest-fstrim called");
874 QTAILQ_INIT(&mounts
);
875 build_fs_mount_list(&mounts
, &local_err
);
877 error_propagate(errp
, local_err
);
881 QTAILQ_FOREACH(mount
, &mounts
, next
) {
882 fd
= qemu_open(mount
->dirname
, O_RDONLY
);
884 error_setg_errno(errp
, errno
, "failed to open %s", mount
->dirname
);
888 /* We try to cull filesytems we know won't work in advance, but other
889 * filesytems may not implement fstrim for less obvious reasons. These
890 * will report EOPNOTSUPP; we simply ignore these errors. Any other
891 * error means an unexpected error, so return it in those cases. In
892 * some other cases ENOTTY will be reported (e.g. CD-ROMs).
894 ret
= ioctl(fd
, FITRIM
, &r
);
896 if (errno
!= ENOTTY
&& errno
!= EOPNOTSUPP
) {
897 error_setg_errno(errp
, errno
, "failed to trim %s",
907 free_fs_mount_list(&mounts
);
909 #endif /* CONFIG_FSTRIM */
912 #define LINUX_SYS_STATE_FILE "/sys/power/state"
913 #define SUSPEND_SUPPORTED 0
914 #define SUSPEND_NOT_SUPPORTED 1
916 static void bios_supports_mode(const char *pmutils_bin
, const char *pmutils_arg
,
917 const char *sysfile_str
, Error
**errp
)
919 Error
*local_err
= NULL
;
924 pmutils_path
= g_find_program_in_path(pmutils_bin
);
928 char buf
[32]; /* hopefully big enough */
933 reopen_fd_to_null(0);
934 reopen_fd_to_null(1);
935 reopen_fd_to_null(2);
938 execle(pmutils_path
, pmutils_bin
, pmutils_arg
, NULL
, environ
);
942 * If we get here either pm-utils is not installed or execle() has
943 * failed. Let's try the manual method if the caller wants it.
947 _exit(SUSPEND_NOT_SUPPORTED
);
950 fd
= open(LINUX_SYS_STATE_FILE
, O_RDONLY
);
952 _exit(SUSPEND_NOT_SUPPORTED
);
955 ret
= read(fd
, buf
, sizeof(buf
)-1);
957 _exit(SUSPEND_NOT_SUPPORTED
);
961 if (strstr(buf
, sysfile_str
)) {
962 _exit(SUSPEND_SUPPORTED
);
965 _exit(SUSPEND_NOT_SUPPORTED
);
966 } else if (pid
< 0) {
967 error_setg_errno(errp
, errno
, "failed to create child process");
971 ga_wait_child(pid
, &status
, &local_err
);
973 error_propagate(errp
, local_err
);
977 if (!WIFEXITED(status
)) {
978 error_setg(errp
, "child process has terminated abnormally");
982 switch (WEXITSTATUS(status
)) {
983 case SUSPEND_SUPPORTED
:
985 case SUSPEND_NOT_SUPPORTED
:
987 "the requested suspend mode is not supported by the guest");
991 "the helper program '%s' returned an unexpected exit status"
992 " code (%d)", pmutils_path
, WEXITSTATUS(status
));
997 g_free(pmutils_path
);
1000 static void guest_suspend(const char *pmutils_bin
, const char *sysfile_str
,
1003 Error
*local_err
= NULL
;
1008 pmutils_path
= g_find_program_in_path(pmutils_bin
);
1016 reopen_fd_to_null(0);
1017 reopen_fd_to_null(1);
1018 reopen_fd_to_null(2);
1021 execle(pmutils_path
, pmutils_bin
, NULL
, environ
);
1025 * If we get here either pm-utils is not installed or execle() has
1026 * failed. Let's try the manual method if the caller wants it.
1030 _exit(EXIT_FAILURE
);
1033 fd
= open(LINUX_SYS_STATE_FILE
, O_WRONLY
);
1035 _exit(EXIT_FAILURE
);
1038 if (write(fd
, sysfile_str
, strlen(sysfile_str
)) < 0) {
1039 _exit(EXIT_FAILURE
);
1042 _exit(EXIT_SUCCESS
);
1043 } else if (pid
< 0) {
1044 error_setg_errno(errp
, errno
, "failed to create child process");
1048 ga_wait_child(pid
, &status
, &local_err
);
1050 error_propagate(errp
, local_err
);
1054 if (!WIFEXITED(status
)) {
1055 error_setg(errp
, "child process has terminated abnormally");
1059 if (WEXITSTATUS(status
)) {
1060 error_setg(errp
, "child process has failed to suspend");
1065 g_free(pmutils_path
);
1068 void qmp_guest_suspend_disk(Error
**errp
)
1070 Error
*local_err
= NULL
;
1072 bios_supports_mode("pm-is-supported", "--hibernate", "disk", &local_err
);
1074 error_propagate(errp
, local_err
);
1078 guest_suspend("pm-hibernate", "disk", errp
);
1081 void qmp_guest_suspend_ram(Error
**errp
)
1083 Error
*local_err
= NULL
;
1085 bios_supports_mode("pm-is-supported", "--suspend", "mem", &local_err
);
1087 error_propagate(errp
, local_err
);
1091 guest_suspend("pm-suspend", "mem", errp
);
1094 void qmp_guest_suspend_hybrid(Error
**errp
)
1096 Error
*local_err
= NULL
;
1098 bios_supports_mode("pm-is-supported", "--suspend-hybrid", NULL
,
1101 error_propagate(errp
, local_err
);
1105 guest_suspend("pm-suspend-hybrid", NULL
, errp
);
1108 static GuestNetworkInterfaceList
*
1109 guest_find_interface(GuestNetworkInterfaceList
*head
,
1112 for (; head
; head
= head
->next
) {
1113 if (strcmp(head
->value
->name
, name
) == 0) {
1122 * Build information about guest interfaces
1124 GuestNetworkInterfaceList
*qmp_guest_network_get_interfaces(Error
**errp
)
1126 GuestNetworkInterfaceList
*head
= NULL
, *cur_item
= NULL
;
1127 struct ifaddrs
*ifap
, *ifa
;
1129 if (getifaddrs(&ifap
) < 0) {
1130 error_setg_errno(errp
, errno
, "getifaddrs failed");
1134 for (ifa
= ifap
; ifa
; ifa
= ifa
->ifa_next
) {
1135 GuestNetworkInterfaceList
*info
;
1136 GuestIpAddressList
**address_list
= NULL
, *address_item
= NULL
;
1137 char addr4
[INET_ADDRSTRLEN
];
1138 char addr6
[INET6_ADDRSTRLEN
];
1141 unsigned char *mac_addr
;
1144 g_debug("Processing %s interface", ifa
->ifa_name
);
1146 info
= guest_find_interface(head
, ifa
->ifa_name
);
1149 info
= g_malloc0(sizeof(*info
));
1150 info
->value
= g_malloc0(sizeof(*info
->value
));
1151 info
->value
->name
= g_strdup(ifa
->ifa_name
);
1154 head
= cur_item
= info
;
1156 cur_item
->next
= info
;
1161 if (!info
->value
->has_hardware_address
&&
1162 ifa
->ifa_flags
& SIOCGIFHWADDR
) {
1163 /* we haven't obtained HW address yet */
1164 sock
= socket(PF_INET
, SOCK_STREAM
, 0);
1166 error_setg_errno(errp
, errno
, "failed to create socket");
1170 memset(&ifr
, 0, sizeof(ifr
));
1171 pstrcpy(ifr
.ifr_name
, IF_NAMESIZE
, info
->value
->name
);
1172 if (ioctl(sock
, SIOCGIFHWADDR
, &ifr
) == -1) {
1173 error_setg_errno(errp
, errno
,
1174 "failed to get MAC address of %s",
1181 mac_addr
= (unsigned char *) &ifr
.ifr_hwaddr
.sa_data
;
1183 info
->value
->hardware_address
=
1184 g_strdup_printf("%02x:%02x:%02x:%02x:%02x:%02x",
1185 (int) mac_addr
[0], (int) mac_addr
[1],
1186 (int) mac_addr
[2], (int) mac_addr
[3],
1187 (int) mac_addr
[4], (int) mac_addr
[5]);
1189 info
->value
->has_hardware_address
= true;
1192 if (ifa
->ifa_addr
&&
1193 ifa
->ifa_addr
->sa_family
== AF_INET
) {
1194 /* interface with IPv4 address */
1195 p
= &((struct sockaddr_in
*)ifa
->ifa_addr
)->sin_addr
;
1196 if (!inet_ntop(AF_INET
, p
, addr4
, sizeof(addr4
))) {
1197 error_setg_errno(errp
, errno
, "inet_ntop failed");
1201 address_item
= g_malloc0(sizeof(*address_item
));
1202 address_item
->value
= g_malloc0(sizeof(*address_item
->value
));
1203 address_item
->value
->ip_address
= g_strdup(addr4
);
1204 address_item
->value
->ip_address_type
= GUEST_IP_ADDRESS_TYPE_IPV4
;
1206 if (ifa
->ifa_netmask
) {
1207 /* Count the number of set bits in netmask.
1208 * This is safe as '1' and '0' cannot be shuffled in netmask. */
1209 p
= &((struct sockaddr_in
*)ifa
->ifa_netmask
)->sin_addr
;
1210 address_item
->value
->prefix
= ctpop32(((uint32_t *) p
)[0]);
1212 } else if (ifa
->ifa_addr
&&
1213 ifa
->ifa_addr
->sa_family
== AF_INET6
) {
1214 /* interface with IPv6 address */
1215 p
= &((struct sockaddr_in6
*)ifa
->ifa_addr
)->sin6_addr
;
1216 if (!inet_ntop(AF_INET6
, p
, addr6
, sizeof(addr6
))) {
1217 error_setg_errno(errp
, errno
, "inet_ntop failed");
1221 address_item
= g_malloc0(sizeof(*address_item
));
1222 address_item
->value
= g_malloc0(sizeof(*address_item
->value
));
1223 address_item
->value
->ip_address
= g_strdup(addr6
);
1224 address_item
->value
->ip_address_type
= GUEST_IP_ADDRESS_TYPE_IPV6
;
1226 if (ifa
->ifa_netmask
) {
1227 /* Count the number of set bits in netmask.
1228 * This is safe as '1' and '0' cannot be shuffled in netmask. */
1229 p
= &((struct sockaddr_in6
*)ifa
->ifa_netmask
)->sin6_addr
;
1230 address_item
->value
->prefix
=
1231 ctpop32(((uint32_t *) p
)[0]) +
1232 ctpop32(((uint32_t *) p
)[1]) +
1233 ctpop32(((uint32_t *) p
)[2]) +
1234 ctpop32(((uint32_t *) p
)[3]);
1238 if (!address_item
) {
1242 address_list
= &info
->value
->ip_addresses
;
1244 while (*address_list
&& (*address_list
)->next
) {
1245 address_list
= &(*address_list
)->next
;
1248 if (!*address_list
) {
1249 *address_list
= address_item
;
1251 (*address_list
)->next
= address_item
;
1254 info
->value
->has_ip_addresses
= true;
1264 qapi_free_GuestNetworkInterfaceList(head
);
1268 #define SYSCONF_EXACT(name, errp) sysconf_exact((name), #name, (errp))
1270 static long sysconf_exact(int name
, const char *name_str
, Error
**errp
)
1275 ret
= sysconf(name
);
1278 error_setg(errp
, "sysconf(%s): value indefinite", name_str
);
1280 error_setg_errno(errp
, errno
, "sysconf(%s)", name_str
);
1286 /* Transfer online/offline status between @vcpu and the guest system.
1288 * On input either @errp or *@errp must be NULL.
1290 * In system-to-@vcpu direction, the following @vcpu fields are accessed:
1291 * - R: vcpu->logical_id
1293 * - W: vcpu->can_offline
1295 * In @vcpu-to-system direction, the following @vcpu fields are accessed:
1296 * - R: vcpu->logical_id
1299 * Written members remain unmodified on error.
1301 static void transfer_vcpu(GuestLogicalProcessor
*vcpu
, bool sys2vcpu
,
1307 dirpath
= g_strdup_printf("/sys/devices/system/cpu/cpu%" PRId64
"/",
1309 dirfd
= open(dirpath
, O_RDONLY
| O_DIRECTORY
);
1311 error_setg_errno(errp
, errno
, "open(\"%s\")", dirpath
);
1313 static const char fn
[] = "online";
1317 fd
= openat(dirfd
, fn
, sys2vcpu
? O_RDONLY
: O_RDWR
);
1319 if (errno
!= ENOENT
) {
1320 error_setg_errno(errp
, errno
, "open(\"%s/%s\")", dirpath
, fn
);
1321 } else if (sys2vcpu
) {
1322 vcpu
->online
= true;
1323 vcpu
->can_offline
= false;
1324 } else if (!vcpu
->online
) {
1325 error_setg(errp
, "logical processor #%" PRId64
" can't be "
1326 "offlined", vcpu
->logical_id
);
1327 } /* otherwise pretend successful re-onlining */
1329 unsigned char status
;
1331 res
= pread(fd
, &status
, 1, 0);
1333 error_setg_errno(errp
, errno
, "pread(\"%s/%s\")", dirpath
, fn
);
1334 } else if (res
== 0) {
1335 error_setg(errp
, "pread(\"%s/%s\"): unexpected EOF", dirpath
,
1337 } else if (sys2vcpu
) {
1338 vcpu
->online
= (status
!= '0');
1339 vcpu
->can_offline
= true;
1340 } else if (vcpu
->online
!= (status
!= '0')) {
1341 status
= '0' + vcpu
->online
;
1342 if (pwrite(fd
, &status
, 1, 0) == -1) {
1343 error_setg_errno(errp
, errno
, "pwrite(\"%s/%s\")", dirpath
,
1346 } /* otherwise pretend successful re-(on|off)-lining */
1359 GuestLogicalProcessorList
*qmp_guest_get_vcpus(Error
**errp
)
1362 GuestLogicalProcessorList
*head
, **link
;
1364 Error
*local_err
= NULL
;
1369 sc_max
= SYSCONF_EXACT(_SC_NPROCESSORS_CONF
, &local_err
);
1371 while (local_err
== NULL
&& current
< sc_max
) {
1372 GuestLogicalProcessor
*vcpu
;
1373 GuestLogicalProcessorList
*entry
;
1375 vcpu
= g_malloc0(sizeof *vcpu
);
1376 vcpu
->logical_id
= current
++;
1377 vcpu
->has_can_offline
= true; /* lolspeak ftw */
1378 transfer_vcpu(vcpu
, true, &local_err
);
1380 entry
= g_malloc0(sizeof *entry
);
1381 entry
->value
= vcpu
;
1384 link
= &entry
->next
;
1387 if (local_err
== NULL
) {
1388 /* there's no guest with zero VCPUs */
1389 g_assert(head
!= NULL
);
1393 qapi_free_GuestLogicalProcessorList(head
);
1394 error_propagate(errp
, local_err
);
1398 int64_t qmp_guest_set_vcpus(GuestLogicalProcessorList
*vcpus
, Error
**errp
)
1401 Error
*local_err
= NULL
;
1404 while (vcpus
!= NULL
) {
1405 transfer_vcpu(vcpus
->value
, false, &local_err
);
1406 if (local_err
!= NULL
) {
1410 vcpus
= vcpus
->next
;
1413 if (local_err
!= NULL
) {
1414 if (processed
== 0) {
1415 error_propagate(errp
, local_err
);
1417 error_free(local_err
);
1424 #else /* defined(__linux__) */
1426 void qmp_guest_suspend_disk(Error
**errp
)
1428 error_set(errp
, QERR_UNSUPPORTED
);
1431 void qmp_guest_suspend_ram(Error
**errp
)
1433 error_set(errp
, QERR_UNSUPPORTED
);
1436 void qmp_guest_suspend_hybrid(Error
**errp
)
1438 error_set(errp
, QERR_UNSUPPORTED
);
1441 GuestNetworkInterfaceList
*qmp_guest_network_get_interfaces(Error
**errp
)
1443 error_set(errp
, QERR_UNSUPPORTED
);
1447 GuestLogicalProcessorList
*qmp_guest_get_vcpus(Error
**errp
)
1449 error_set(errp
, QERR_UNSUPPORTED
);
1453 int64_t qmp_guest_set_vcpus(GuestLogicalProcessorList
*vcpus
, Error
**errp
)
1455 error_set(errp
, QERR_UNSUPPORTED
);
1461 #if !defined(CONFIG_FSFREEZE)
1463 GuestFsfreezeStatus
qmp_guest_fsfreeze_status(Error
**errp
)
1465 error_set(errp
, QERR_UNSUPPORTED
);
1470 int64_t qmp_guest_fsfreeze_freeze(Error
**errp
)
1472 error_set(errp
, QERR_UNSUPPORTED
);
1477 int64_t qmp_guest_fsfreeze_thaw(Error
**errp
)
1479 error_set(errp
, QERR_UNSUPPORTED
);
1483 #endif /* CONFIG_FSFREEZE */
1485 #if !defined(CONFIG_FSTRIM)
1486 void qmp_guest_fstrim(bool has_minimum
, int64_t minimum
, Error
**errp
)
1488 error_set(errp
, QERR_UNSUPPORTED
);
1492 /* register init/cleanup routines for stateful command groups */
1493 void ga_command_state_init(GAState
*s
, GACommandState
*cs
)
1495 #if defined(CONFIG_FSFREEZE)
1496 ga_command_state_add(cs
, NULL
, guest_fsfreeze_cleanup
);
1498 ga_command_state_add(cs
, guest_file_init
, NULL
);