2 # virt-list-filesystems
3 # Copyright (C) 2009 Red Hat Inc.
5 # This program is free software; you can redistribute it and/or modify
6 # it under the terms of the GNU General Public License as published by
7 # the Free Software Foundation; either version 2 of the License, or
8 # (at your option) any later version.
10 # This program is distributed in the hope that it will be useful,
11 # but WITHOUT ANY WARRANTY; without even the implied warranty of
12 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 # GNU General Public License for more details.
15 # You should have received a copy of the GNU General Public License
16 # along with this program; if not, write to the Free Software
17 # Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
23 use Sys::Guestfs::Lib qw(open_guest get_partitions);
26 use Locale::TextDomain 'libguestfs';
32 virt-list-filesystems - List filesystems in a virtual machine or disk image
36 virt-list-filesystems [--options] domname
38 virt-list-filesystems [--options] disk.img [disk.img ...]
42 C<virt-list-filesystems> is a command line tool to list
43 the filesystems that are contained in a virtual machine or
46 C<virt-list-filesystems> is just a simple wrapper around
47 L<libguestfs(3)> functionality. For more complex cases you should
48 look at the L<guestfish(1)> tool.
68 Display version number and exit.
74 =item B<--connect URI> | B<-c URI>
76 If using libvirt, connect to the given I<URI>. If omitted, then we
77 connect to the default libvirt hypervisor.
79 If you specify guest block devices directly, then libvirt is not used
86 =item B<-l> | B<--long>
88 With this option, C<virt-list-filesystems> displays the type of
89 each filesystem too (where "type" means C<ext3>, C<xfs> etc.)
95 =item B<-a> | B<--all>
97 Normally we only show mountable filesystems. If this option
98 is given then swap devices are shown too.
104 # Configure bundling, otherwise '-al' is treated as '--all'.
105 Getopt::Long::Configure ("bundling");
107 GetOptions ("help|?" => \$help,
108 "version" => \$version,
109 "connect|c=s" => \$uri,
113 pod2usage (1) if $help;
115 my $g = Sys::Guestfs->new ();
116 my %h = $g->version ();
117 print "$h{major}.$h{minor}.$h{release}$h{extra}\n";
121 pod2usage (__"virt-list-filesystems: no image or VM name given")
126 $g = open_guest (\@ARGV, address => $uri);
128 $g = open_guest (\@ARGV);
133 # List of partitions, LVs etc.
134 my @partitions = get_partitions ($g);
140 # Try and mount each one, to see what's mountable.
141 foreach $dev (@partitions) {
142 eval { $g->mount_ro ($dev, "/"); };
143 my $mountable = $@ ? 0 : 1;
148 push @not_mountable, $dev;
152 foreach $dev (@fses) {
153 print canonicalize($dev);
156 eval { $fstype = $g->vfs_type ($dev); };
166 # If asked, look in the not_mountable list for potential swap devices.
168 foreach $dev (@not_mountable) {
170 eval { $file = $g->file ($dev); };
171 if ($file && $file =~ /\bswap\b/) {
172 print canonicalize($dev);
173 print " swap" if $long;
179 # The reverse of device name translation, see
180 # BLOCK DEVICE NAMING in guestfs(3).
185 if (m{^/dev/[hv]d([a-z]\d)$}) {
193 Libvirt guest names can contain arbitrary characters, some of which
194 have meaning to the shell such as C<#> and space. You may need to
195 quote or escape these characters on the command line. See the shell
196 manual page L<sh(1)> for details.
204 L<virt-list-partitions(1)>,
206 L<Sys::Guestfs::Lib(3)>,
208 L<http://libguestfs.org/>.
212 Richard W.M. Jones L<http://people.redhat.com/~rjones/>
216 Copyright (C) 2009 Red Hat Inc.
218 This program is free software; you can redistribute it and/or modify
219 it under the terms of the GNU General Public License as published by
220 the Free Software Foundation; either version 2 of the License, or
221 (at your option) any later version.
223 This program is distributed in the hope that it will be useful,
224 but WITHOUT ANY WARRANTY; without even the implied warranty of
225 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
226 GNU General Public License for more details.
228 You should have received a copy of the GNU General Public License
229 along with this program; if not, write to the Free Software
230 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.