improve bash completion

[qemu-server.git] / PVE / QemuServer.pm

diff --git a/PVE/QemuServer.pm b/PVE/QemuServer.pm
index a50331132d4b890c382ec6c1761d487245831bfd..fedb58e486fe7387a4faf1dedbcb76de3a660ae7 100644 (file)
--- a/PVE/QemuServer.pm
+++ b/PVE/QemuServer.pm
@@ -6443,4 +6443,18 @@ sub complete_vmid_running {
     return &$complete_vmid_full(1);
 }
 
+sub complete_storage {
+
+    my $cfg = PVE::Storage::config();
+    my $ids = $cfg->{ids};
+
+    my $res = [];
+    foreach my $sid (keys %$ids) {
+       next if !PVE::Storage::storage_check_enabled($cfg, $sid, undef, 1);
+       push @$res, $sid;
+    }
+
+    return $res;
+}
+
 1;