yesBad/pve-storage
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

sheepdog : free_image : parse volname

Browse Source 
Signed-off-by: Alexandre Derumier <aderumier@odiso.com>
This commit is contained in:
Alexandre Derumier
2013-02-05 12:55:52 +01:00
committed by Dietmar Maurer
parent 87157341ad
commit b2f975cf1e
1 changed files with 8 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
PVE/Storage/SheepdogPlugin.pm
View File

@ -253,15 +253,18 @@ sub alloc_image {
sub free_image {
my ($class, $storeid, $scfg, $volname, $isBase) = @_;
my $snapshots = sheepdog_snapshot_ls($scfg, $volname);
my ($vtype, $name, $vmid, undef, undef, undef) =
$class->parse_volname($volname);
my $snapshots = sheepdog_snapshot_ls($scfg, $name);
while (my ($snapname) = each %$snapshots) {
my $cmd = &$collie_cmd($scfg, 'vdi', 'delete' , '-s', $snapname, $volname);
run_command($cmd, errmsg => "sheepdog delete snapshot $snapname $volname' error");
my $cmd = &$collie_cmd($scfg, 'vdi', 'delete' , '-s', $snapname, $name);
run_command($cmd, errmsg => "sheepdog delete snapshot $snapname $name' error");
}
my $cmd = &$collie_cmd($scfg, 'vdi', 'delete' , $volname);
my $cmd = &$collie_cmd($scfg, 'vdi', 'delete' , $name);
run_command($cmd, errmsg => "sheepdog delete $volname' error");
run_command($cmd, errmsg => "sheepdog delete $name' error");
return undef;
}