for base images we call the volume_import of the parent plugin and pass
it as vm-image instead of base-image, then convert it back as base-image

Signed-off-by: Hannes Duerr <h.du...@proxmox.com>
---
 src/PVE/Storage/LvmThinPlugin.pm | 60 ++++++++++++++++++++++++++++++++
 1 file changed, 60 insertions(+)

diff --git a/src/PVE/Storage/LvmThinPlugin.pm b/src/PVE/Storage/LvmThinPlugin.pm
index 1d2e37c..6c95919 100644
--- a/src/PVE/Storage/LvmThinPlugin.pm
+++ b/src/PVE/Storage/LvmThinPlugin.pm
@@ -383,6 +383,66 @@ sub volume_has_feature {
     return undef;
 }
 
+sub volume_import {
+    my ($class, $scfg, $storeid, $fh, $volname, $format, $snapshot, 
$base_snapshot, $with_snapshots, $allow_rename) = @_;
+    die "volume import format $format not available for $class\n"
+       if $format ne 'raw+size';
+    die "cannot import volumes together with their snapshots in $class\n"
+       if $with_snapshots;
+    die "cannot import an incremental stream in $class\n" if 
defined($base_snapshot);
+
+    my ($vtype, $name, $vmid, $basename, $basevmid, $isBase, $file_format) =
+       $class->parse_volname($volname);
+    die "cannot import format $format into a file of format $file_format\n"
+       if $file_format ne 'raw';
+
+    my $oldbasename;
+    if (!$isBase) {
+       ($storeid, $volname) =  split (/:/, $class->SUPER::volume_import(
+           $scfg,
+           $storeid,
+           $fh,
+           $name,
+           $format,
+           $snapshot,
+           $base_snapshot,
+           $with_snapshots,
+           $allow_rename
+       ));
+    } else {
+       my $vg = $scfg->{vgname};
+       my $lvs = PVE::Storage::LVMPlugin::lvm_list_volumes($vg);
+       if ($lvs->{$vg}->{$volname}) {
+           die "volume $vg/$volname already exists\n" if !$allow_rename;
+           warn "volume $vg/$volname already exists - importing with a 
different name\n";
+
+           $volname = $class->find_free_diskname($storeid, $scfg, $vmid);
+       } else {
+           $oldbasename = $volname;
+           $volname =~ s/base/vm/;
+       }
+
+       ($storeid, $volname) =  split (/:/, $class->SUPER::volume_import(
+           $scfg,
+           $storeid,
+           $fh,
+           $volname,
+           $format,
+           $snapshot,
+           $base_snapshot,
+           $with_snapshots,
+           $allow_rename
+       ));
+
+       $volname = $class->create_base($storeid, $scfg, $volname);
+       if ($oldbasename) {
+           $volname= $oldbasename;
+       }
+    }
+
+    return "$storeid:$volname";
+}
+
 # used in LVMPlugin->volume_import
 sub volume_import_write {
     my ($class, $input_fh, $output_file) = @_;
-- 
2.39.2



_______________________________________________
pve-devel mailing list
pve-devel@lists.proxmox.com
https://lists.proxmox.com/cgi-bin/mailman/listinfo/pve-devel

Reply via email to