don't create swap snapshot

[vmdk-backup] / vmdk-backup.pl

diff --git a/vmdk-backup.pl b/vmdk-backup.pl
index 0205997..e66193f 100755 (executable)
--- a/vmdk-backup.pl
+++ b/vmdk-backup.pl
@@ -64,6 +64,7 @@ while(<$lvs>) {
                next;
        }
        push @lv_create, "lvcreate --name $name --size $size $vg_backup";
+       next if $name =~ m/swap/;
        push @lv_create, "lvcreate --snapshot /dev/$vg/$name --name ${name}-snap --size 100M";
        push @lv_remove, "/dev/$vg/$name-snap";
 }
@@ -116,14 +117,19 @@ mkdir $tmp unless -d $tmp;
 
 my @umount;
 
+sub dev_to_backup {
+       my $dev = shift;
+       $dev =~ s{/dev/$sda}{/dev/mapper/nbd0p} ||
+       $dev =~ s{/dev/mapper/.+-([^-]+)}{/dev/mapper/$vg_backup-$1} ||
+       die "can't map $dev to new backup device!";
+       return $dev;
+}
+
 foreach my $mount ( @mounts ) {
        my ( $dev, $path, $fs ) = @$mount;
        if ( exists $blks->{$dev} ) {
                warn "working on $dev $path $fs\n";
-               my $dev_backup = $dev;
-               $dev_backup =~ s{/dev/$sda}{/dev/mapper/nbd0p} ||
-               $dev_backup =~ s{/dev/mapper/.+-([^-]+)}{/dev/mapper/$vg_backup-$1} ||
-               die "can't map $dev to new backup device!";
+               my $dev_backup = dev_to_backup($dev);
                my $label = $blks->{$dev}->{LABEL};
                $label = $label ? "-L $label" : '';
                sh "mkfs.$fs $label $dev_backup";
@@ -140,7 +146,13 @@ foreach my $mount ( @mounts ) {
 
 chdir '/';
 
-warn "FIXME create swap\n";
+if ( my $swap = (grep { $blks->{$_}->{TYPE} eq 'swap' } keys %$blks)[0] ) {
+       my $dev = dev_to_backup($swap);
+       my $label = $blks->{$swap}->{LABEL};
+       $label = $label ? "-L $label" : '';
+       warn "create swap on $dev\n";
+       sh "mkswap $label $dev";
+}
 
 
 warn "cleanup...\n";
@@ -151,6 +163,8 @@ sh "lvremove -f $_" foreach @lv_remove;
 
 sh "vgchange --available n $vg_backup";
 
+sh "vgexport $vg_backup";
+
 sh "kpartx -dv /dev/nbd0";
 
 warn "finished in ", time() - $start_t, " seconds\n";