2 * Copyright (C) 2010-2011 Red Hat Inc.
4 * This library is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU Lesser General Public
6 * License as published by the Free Software Foundation; either
7 * version 2 of the License, or (at your option) any later version.
9 * This library is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 * Lesser General Public License for more details.
14 * You should have received a copy of the GNU Lesser General Public
15 * License along with this library; if not, write to the Free Software
16 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
39 #include "ignore-value.h"
43 #include "guestfs-internal.h"
44 #include "guestfs-internal-actions.h"
45 #include "guestfs_protocol.h"
47 #if defined(HAVE_HIVEX)
49 /* The main inspection code. */
51 guestfs__inspect_os (guestfs_h *g)
53 /* Remove any information previously stored in the handle. */
54 guestfs___free_inspect_info (g);
56 if (guestfs_umount_all (g) == -1)
59 /* Iterate over all possible devices. Try to mount each
60 * (read-only). Examine ones which contain filesystems and add that
61 * information to the handle.
63 /* Look to see if any devices directly contain filesystems (RHBZ#590167). */
64 char **devices = guestfs_list_devices (g);
69 for (i = 0; devices[i] != NULL; ++i) {
70 if (guestfs___check_for_filesystem_on (g, devices[i], 1, 0) == -1) {
71 guestfs___free_string_list (devices);
72 guestfs___free_inspect_info (g);
76 guestfs___free_string_list (devices);
78 /* Look at all partitions. */
79 char **partitions = guestfs_list_partitions (g);
80 if (partitions == NULL) {
81 guestfs___free_inspect_info (g);
85 for (i = 0; partitions[i] != NULL; ++i) {
86 if (guestfs___check_for_filesystem_on (g, partitions[i], 0, i+1) == -1) {
87 guestfs___free_string_list (partitions);
88 guestfs___free_inspect_info (g);
92 guestfs___free_string_list (partitions);
94 /* Look at MD devices. */
95 char **mds = guestfs_list_md_devices (g);
97 guestfs___free_inspect_info (g);
101 for (i = 0; mds[i] != NULL; ++i) {
102 if (guestfs___check_for_filesystem_on (g, mds[i], 0, i+1) == -1) {
103 guestfs___free_string_list (mds);
104 guestfs___free_inspect_info (g);
108 guestfs___free_string_list (mds);
110 /* Look at all LVs. */
111 if (guestfs___feature_available (g, "lvm2")) {
113 lvs = guestfs_lvs (g);
115 guestfs___free_inspect_info (g);
119 for (i = 0; lvs[i] != NULL; ++i) {
120 if (guestfs___check_for_filesystem_on (g, lvs[i], 0, 0) == -1) {
121 guestfs___free_string_list (lvs);
122 guestfs___free_inspect_info (g);
126 guestfs___free_string_list (lvs);
129 /* At this point we have, in the handle, a list of all filesystems
130 * found and data about each one. Now we assemble the list of
131 * filesystems which are root devices and return that to the user.
132 * Fall through to guestfs__inspect_get_roots to do that.
134 char **ret = guestfs__inspect_get_roots (g);
136 guestfs___free_inspect_info (g);
141 compare_strings (const void *vp1, const void *vp2)
143 const char *s1 = * (char * const *) vp1;
144 const char *s2 = * (char * const *) vp2;
146 return strcmp (s1, s2);
150 guestfs__inspect_get_roots (guestfs_h *g)
152 /* NB. Doesn't matter if g->nr_fses == 0. We just return an empty
158 for (i = 0; i < g->nr_fses; ++i)
159 if (g->fses[i].is_root)
162 char **ret = calloc (count+1, sizeof (char *));
164 perrorf (g, "calloc");
169 for (i = 0; i < g->nr_fses; ++i) {
170 if (g->fses[i].is_root) {
171 ret[count] = safe_strdup (g, g->fses[i].device);
177 qsort (ret, count, sizeof (char *), compare_strings);
183 guestfs__inspect_get_type (guestfs_h *g, const char *root)
185 struct inspect_fs *fs = guestfs___search_for_root (g, root);
191 case OS_TYPE_FREEBSD: ret = safe_strdup (g, "freebsd"); break;
192 case OS_TYPE_LINUX: ret = safe_strdup (g, "linux"); break;
193 case OS_TYPE_NETBSD: ret = safe_strdup (g, "netbsd"); break;
194 case OS_TYPE_WINDOWS: ret = safe_strdup (g, "windows"); break;
195 case OS_TYPE_UNKNOWN: default: ret = safe_strdup (g, "unknown"); break;
202 guestfs__inspect_get_arch (guestfs_h *g, const char *root)
204 struct inspect_fs *fs = guestfs___search_for_root (g, root);
208 return safe_strdup (g, fs->arch ? : "unknown");
212 guestfs__inspect_get_distro (guestfs_h *g, const char *root)
214 struct inspect_fs *fs = guestfs___search_for_root (g, root);
219 switch (fs->distro) {
220 case OS_DISTRO_ARCHLINUX: ret = safe_strdup (g, "archlinux"); break;
221 case OS_DISTRO_CENTOS: ret = safe_strdup (g, "centos"); break;
222 case OS_DISTRO_DEBIAN: ret = safe_strdup (g, "debian"); break;
223 case OS_DISTRO_FEDORA: ret = safe_strdup (g, "fedora"); break;
224 case OS_DISTRO_GENTOO: ret = safe_strdup (g, "gentoo"); break;
225 case OS_DISTRO_LINUX_MINT: ret = safe_strdup (g, "linuxmint"); break;
226 case OS_DISTRO_MAGEIA: ret = safe_strdup (g, "mageia"); break;
227 case OS_DISTRO_MANDRIVA: ret = safe_strdup (g, "mandriva"); break;
228 case OS_DISTRO_MEEGO: ret = safe_strdup (g, "meego"); break;
229 case OS_DISTRO_OPENSUSE: ret = safe_strdup (g, "opensuse"); break;
230 case OS_DISTRO_PARDUS: ret = safe_strdup (g, "pardus"); break;
231 case OS_DISTRO_REDHAT_BASED: ret = safe_strdup (g, "redhat-based"); break;
232 case OS_DISTRO_RHEL: ret = safe_strdup (g, "rhel"); break;
233 case OS_DISTRO_SCIENTIFIC_LINUX: ret = safe_strdup (g, "scientificlinux"); break;
234 case OS_DISTRO_SLACKWARE: ret = safe_strdup (g, "slackware"); break;
235 case OS_DISTRO_TTYLINUX: ret = safe_strdup (g, "ttylinux"); break;
236 case OS_DISTRO_WINDOWS: ret = safe_strdup (g, "windows"); break;
237 case OS_DISTRO_UBUNTU: ret = safe_strdup (g, "ubuntu"); break;
238 case OS_DISTRO_UNKNOWN: default: ret = safe_strdup (g, "unknown"); break;
245 guestfs__inspect_get_major_version (guestfs_h *g, const char *root)
247 struct inspect_fs *fs = guestfs___search_for_root (g, root);
251 return fs->major_version;
255 guestfs__inspect_get_minor_version (guestfs_h *g, const char *root)
257 struct inspect_fs *fs = guestfs___search_for_root (g, root);
261 return fs->minor_version;
265 guestfs__inspect_get_product_name (guestfs_h *g, const char *root)
267 struct inspect_fs *fs = guestfs___search_for_root (g, root);
271 return safe_strdup (g, fs->product_name ? : "unknown");
275 guestfs__inspect_get_product_variant (guestfs_h *g, const char *root)
277 struct inspect_fs *fs = guestfs___search_for_root (g, root);
281 return safe_strdup (g, fs->product_variant ? : "unknown");
285 guestfs__inspect_get_windows_systemroot (guestfs_h *g, const char *root)
287 struct inspect_fs *fs = guestfs___search_for_root (g, root);
291 if (!fs->windows_systemroot) {
292 error (g, _("not a Windows guest, or systemroot could not be determined"));
296 return safe_strdup (g, fs->windows_systemroot);
300 guestfs__inspect_get_windows_current_control_set (guestfs_h *g,
303 struct inspect_fs *fs = guestfs___search_for_root (g, root);
307 if (!fs->windows_current_control_set) {
308 error (g, _("not a Windows guest, or CurrentControlSet could not be determined"));
312 return safe_strdup (g, fs->windows_current_control_set);
316 guestfs__inspect_get_format (guestfs_h *g, const char *root)
318 struct inspect_fs *fs = guestfs___search_for_root (g, root);
323 switch (fs->format) {
324 case OS_FORMAT_INSTALLED: ret = safe_strdup (g, "installed"); break;
325 case OS_FORMAT_INSTALLER: ret = safe_strdup (g, "installer"); break;
326 case OS_FORMAT_UNKNOWN: default: ret = safe_strdup (g, "unknown"); break;
333 guestfs__inspect_is_live (guestfs_h *g, const char *root)
335 struct inspect_fs *fs = guestfs___search_for_root (g, root);
339 return fs->is_live_disk;
343 guestfs__inspect_is_netinst (guestfs_h *g, const char *root)
345 struct inspect_fs *fs = guestfs___search_for_root (g, root);
349 return fs->is_netinst_disk;
353 guestfs__inspect_is_multipart (guestfs_h *g, const char *root)
355 struct inspect_fs *fs = guestfs___search_for_root (g, root);
359 return fs->is_multipart_disk;
363 guestfs__inspect_get_mountpoints (guestfs_h *g, const char *root)
365 struct inspect_fs *fs = guestfs___search_for_root (g, root);
371 /* If no fstab information (Windows) return just the root. */
372 if (fs->nr_fstab == 0) {
373 ret = calloc (3, sizeof (char *));
374 ret[0] = safe_strdup (g, "/");
375 ret[1] = safe_strdup (g, root);
380 #define CRITERION fs->fstab[i].mountpoint[0] == '/'
382 for (i = 0; i < fs->nr_fstab; ++i)
386 /* Hashtables have 2N+1 entries. */
387 ret = calloc (2*count+1, sizeof (char *));
389 perrorf (g, "calloc");
394 for (i = 0; i < fs->nr_fstab; ++i)
396 ret[2*count] = safe_strdup (g, fs->fstab[i].mountpoint);
397 ret[2*count+1] = safe_strdup (g, fs->fstab[i].device);
406 guestfs__inspect_get_filesystems (guestfs_h *g, const char *root)
408 struct inspect_fs *fs = guestfs___search_for_root (g, root);
414 /* If no fstab information (Windows) return just the root. */
415 if (fs->nr_fstab == 0) {
416 ret = calloc (2, sizeof (char *));
417 ret[0] = safe_strdup (g, root);
422 ret = calloc (fs->nr_fstab + 1, sizeof (char *));
424 perrorf (g, "calloc");
429 for (i = 0; i < fs->nr_fstab; ++i)
430 ret[i] = safe_strdup (g, fs->fstab[i].device);
436 guestfs__inspect_get_drive_mappings (guestfs_h *g, const char *root)
440 struct inspect_fs *fs;
442 fs = guestfs___search_for_root (g, root);
446 /* If no drive mappings, return an empty hashtable. */
447 if (!fs->drive_mappings)
450 for (count = 0; fs->drive_mappings[count] != NULL; count++)
454 ret = calloc (count+1, sizeof (char *));
456 perrorf (g, "calloc");
460 /* We need to make a deep copy of the hashtable since the caller
463 for (i = 0; i < count; ++i)
464 ret[i] = safe_strdup (g, fs->drive_mappings[i]);
472 guestfs__inspect_get_package_format (guestfs_h *g, const char *root)
474 struct inspect_fs *fs = guestfs___search_for_root (g, root);
479 switch (fs->package_format) {
480 case OS_PACKAGE_FORMAT_RPM: ret = safe_strdup (g, "rpm"); break;
481 case OS_PACKAGE_FORMAT_DEB: ret = safe_strdup (g, "deb"); break;
482 case OS_PACKAGE_FORMAT_PACMAN: ret = safe_strdup (g, "pacman"); break;
483 case OS_PACKAGE_FORMAT_EBUILD: ret = safe_strdup (g, "ebuild"); break;
484 case OS_PACKAGE_FORMAT_PISI: ret = safe_strdup (g, "pisi"); break;
485 case OS_PACKAGE_FORMAT_PKGSRC: ret = safe_strdup (g, "pkgsrc"); break;
486 case OS_PACKAGE_FORMAT_UNKNOWN:
488 ret = safe_strdup (g, "unknown");
496 guestfs__inspect_get_package_management (guestfs_h *g, const char *root)
498 struct inspect_fs *fs = guestfs___search_for_root (g, root);
503 switch (fs->package_management) {
504 case OS_PACKAGE_MANAGEMENT_YUM: ret = safe_strdup (g, "yum"); break;
505 case OS_PACKAGE_MANAGEMENT_UP2DATE: ret = safe_strdup (g, "up2date"); break;
506 case OS_PACKAGE_MANAGEMENT_APT: ret = safe_strdup (g, "apt"); break;
507 case OS_PACKAGE_MANAGEMENT_PACMAN: ret = safe_strdup (g, "pacman"); break;
508 case OS_PACKAGE_MANAGEMENT_PORTAGE: ret = safe_strdup (g, "portage"); break;
509 case OS_PACKAGE_MANAGEMENT_PISI: ret = safe_strdup (g, "pisi"); break;
510 case OS_PACKAGE_MANAGEMENT_URPMI: ret = safe_strdup (g, "urpmi"); break;
511 case OS_PACKAGE_MANAGEMENT_ZYPPER: ret = safe_strdup (g, "zypper"); break;
512 case OS_PACKAGE_MANAGEMENT_UNKNOWN:
514 ret = safe_strdup (g, "unknown");
522 guestfs__inspect_get_hostname (guestfs_h *g, const char *root)
524 struct inspect_fs *fs = guestfs___search_for_root (g, root);
528 return safe_strdup (g, fs->hostname ? : "unknown");
531 #else /* no hivex at compile time */
533 /* XXX These functions should be in an optgroup. */
535 #define NOT_IMPL(r) \
536 error (g, _("inspection API not available since this version of libguestfs was compiled without the hivex library")); \
540 guestfs__inspect_os (guestfs_h *g)
546 guestfs__inspect_get_roots (guestfs_h *g)
552 guestfs__inspect_get_type (guestfs_h *g, const char *root)
558 guestfs__inspect_get_arch (guestfs_h *g, const char *root)
564 guestfs__inspect_get_distro (guestfs_h *g, const char *root)
570 guestfs__inspect_get_major_version (guestfs_h *g, const char *root)
576 guestfs__inspect_get_minor_version (guestfs_h *g, const char *root)
582 guestfs__inspect_get_product_name (guestfs_h *g, const char *root)
588 guestfs__inspect_get_product_variant (guestfs_h *g, const char *root)
594 guestfs__inspect_get_windows_systemroot (guestfs_h *g, const char *root)
600 guestfs__inspect_get_windows_current_control_set (guestfs_h *g,
607 guestfs__inspect_get_mountpoints (guestfs_h *g, const char *root)
613 guestfs__inspect_get_filesystems (guestfs_h *g, const char *root)
619 guestfs__inspect_get_drive_mappings (guestfs_h *g, const char *root)
625 guestfs__inspect_get_package_format (guestfs_h *g, const char *root)
631 guestfs__inspect_get_package_management (guestfs_h *g, const char *root)
637 guestfs__inspect_get_hostname (guestfs_h *g, const char *root)
643 guestfs__inspect_get_format (guestfs_h *g, const char *root)
649 guestfs__inspect_is_live (guestfs_h *g, const char *root)
655 guestfs__inspect_is_netinst (guestfs_h *g, const char *root)
661 guestfs__inspect_is_multipart (guestfs_h *g, const char *root)
666 #endif /* no hivex at compile time */
669 guestfs___free_inspect_info (guestfs_h *g)
672 for (i = 0; i < g->nr_fses; ++i) {
673 free (g->fses[i].device);
674 free (g->fses[i].product_name);
675 free (g->fses[i].product_variant);
676 free (g->fses[i].arch);
677 free (g->fses[i].hostname);
678 free (g->fses[i].windows_systemroot);
679 free (g->fses[i].windows_current_control_set);
681 for (j = 0; j < g->fses[i].nr_fstab; ++j) {
682 free (g->fses[i].fstab[j].device);
683 free (g->fses[i].fstab[j].mountpoint);
685 free (g->fses[i].fstab);
686 if (g->fses[i].drive_mappings)
687 guestfs___free_string_list (g->fses[i].drive_mappings);
694 /* In the Perl code this is a public function. */
696 guestfs___feature_available (guestfs_h *g, const char *feature)
698 /* If there's an error we should ignore it, so to do that we have to
699 * temporarily replace the error handler with a null one.
701 guestfs_error_handler_cb old_error_cb = g->error_cb;
704 const char *groups[] = { feature, NULL };
705 int r = guestfs_available (g, (char * const *) groups);
707 g->error_cb = old_error_cb;
709 return r == 0 ? 1 : 0;
712 /* Download a guest file to a local temporary file. The file is
713 * cached in the temporary directory, and is not downloaded again.
715 * The name of the temporary (downloaded) file is returned. The
716 * caller must free the pointer, but does *not* need to delete the
717 * temporary file. It will be deleted when the handle is closed.
719 * Refuse to download the guest file if it is larger than max_size.
720 * On this and other errors, NULL is returned.
722 * There is actually one cache per 'struct inspect_fs *' in order
723 * to handle the case of multiple roots.
726 guestfs___download_to_tmp (guestfs_h *g, struct inspect_fs *fs,
727 const char *filename,
728 const char *basename, int64_t max_size)
735 /* Make the basename unique by prefixing it with the fs number. */
736 if (asprintf (&r, "%s/%td-%s", g->tmpdir, fs - g->fses, basename) == -1) {
737 perrorf (g, "asprintf");
741 /* If the file has already been downloaded, return. */
742 if (access (r, R_OK) == 0)
745 /* Check size of remote file. */
746 size = guestfs_filesize (g, filename);
748 /* guestfs_filesize failed and has already set error in handle */
750 if (size > max_size) {
751 error (g, _("size of %s is unreasonably large (%" PRIi64 " bytes)"),
756 fd = open (r, O_WRONLY|O_CREAT|O_TRUNC|O_NOCTTY, 0600);
758 perrorf (g, "open: %s", r);
762 snprintf (devfd, sizeof devfd, "/dev/fd/%d", fd);
764 if (guestfs_download (g, filename, devfd) == -1) {
770 if (close (fd) == -1) {
771 perrorf (g, "close: %s", r);
784 guestfs___search_for_root (guestfs_h *g, const char *root)
786 if (g->nr_fses == 0) {
787 error (g, _("no inspection data: call guestfs_inspect_os first"));
792 struct inspect_fs *fs;
793 for (i = 0; i < g->nr_fses; ++i) {
795 if (fs->is_root && STREQ (root, fs->device))
799 error (g, _("%s: root device not found: only call this function with a root device previously returned by guestfs_inspect_os"),