storage : add volume_snapshot_delete

Signed-off-by: Alexandre Derumier <aderumier@odiso.com>

diff --git a/PVE/Storage.pm b/PVE/Storage.pm
index 387ff20ae8450e0392217201aa638222c2ae1c63..2dfd56157bd6da59b1e7f0b35482701f057d16c6 100755 (executable)
--- a/PVE/Storage.pm
+++ b/PVE/Storage.pm
@@ -168,6 +168,21 @@ sub volume_snapshot_rollback {
     }
 }
 
+sub volume_snapshot_delete {
+    my ($cfg, $volid, $snap, $running) = @_;
+
+    my ($storeid, $volname) = parse_volume_id($volid, 1);
+    if ($storeid) {
+        my $scfg = storage_config($cfg, $storeid);
+        my $plugin = PVE::Storage::Plugin->lookup($scfg->{type});
+        return $plugin->volume_snapshot_rollback_delete($scfg, $storeid, $volname, $snap, $running);
+    } elsif ($volid =~ m|^(/.+)$| && -e $volid) {
+        die "snapshot delete device is not possible";
+    } else {
+        die "can't delete snapshot";
+    }
+}
+
 sub get_image_dir {
     my ($cfg, $storeid, $vmid) = @_;