Proxmox/pve-manager
5
0
Fork 0
Code Pull Requests Releases Activity

ceph/destroypool: optionally remove storages

Browse Source 
only storages which don't have the 'monhost' option set are removed

Signed-off-by: Fabian Grünbichler <f.gruenbichler@proxmox.com>
This commit is contained in:
Fabian Grünbichler 2017-09-05 14:59:38 +02:00 committed by Wolfgang Bumiller
parent 60811ad7eb
commit f6144f3493
1 changed files with 28 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

29
PVE/API2/Ceph.pm
View File

@ -1819,7 +1819,13 @@ __PACKAGE__->register_method ({
type => 'boolean',
optional => 1,
default => 0,
}
},
remove_storages => {
description => "Remove all pveceph-managed storages configured for this pool",
type => 'boolean',
optional => 1,
default => 0,
},
},
},
returns => { type => 'null' },
@ -1828,7 +1834,13 @@ __PACKAGE__->register_method ({
PVE::CephTools::check_ceph_inited();
my $rpcenv = PVE::RPCEnvironment::get();
my $user = $rpcenv->get_user();
$rpcenv->check($user, '/storage', ['Datastore.Allocate'])
if $param->{remove_storages};
my $pool = $param->{name};
my $storages = $get_storages->($pool);
# if not forced, destroy ceph pool only when no
# vm disks are on it anymore
@ -1856,6 +1868,21 @@ __PACKAGE__->register_method ({
format => 'plain',
});
if ($param->{remove_storages}) {
my $err;
foreach my $storeid (keys %$storages) {
# skip external clusters, not managed by pveceph
next if $storages->{$storeid}->{monhost};
eval { PVE::API2::Storage::Config->delete({storage => $storeid}) };
if ($@) {
warn "failed to remove storage '$storeid': $@\n";
$err = 1;
}
}
die "failed to remove (some) storages - check log and remove manually!\n"
if $err;
}
return undef;
}});