This adds a check if the datastore and the namespace is valid when a user attempts to add a new PBS datastore.
Since the namespace only can be checked after the datastore is validated, the datastore will be checked as well, regardless that it will be done later in the superclass anyway. The functionallity to check namespaces is added with this commit. For checking the datastore, existing code that has previously been refactored will be reused Signed-off-by: Philipp Hufnagl <p.hufn...@proxmox.com> --- src/PVE/Storage/PBSPlugin.pm | 41 ++++++++++++++++++++++++++++++++++++ 1 file changed, 41 insertions(+) diff --git a/src/PVE/Storage/PBSPlugin.pm b/src/PVE/Storage/PBSPlugin.pm index 3e0e155..0797cec 100644 --- a/src/PVE/Storage/PBSPlugin.pm +++ b/src/PVE/Storage/PBSPlugin.pm @@ -566,6 +566,11 @@ sub on_add_hook { pbs_delete_master_pubkey($scfg, $storeid); } + my $password = pbs_get_password($scfg, $storeid); + my $conn = pbs_api_connect($scfg, $password); + check_datastore_exists($class, $storeid, $scfg, $password, $conn); + check_namespace_exists($class, $storeid, $scfg, $password, $conn); + return $res; } @@ -614,6 +619,11 @@ sub on_update_hook { } } + my $password = pbs_get_password($scfg, $storeid); + my $conn = pbs_api_connect($scfg, $password); + check_datastore_exists($class, $storeid, $scfg, $password, $conn); + check_namespace_exists($class, $storeid, $scfg, $password, $conn); + return $res; } @@ -817,6 +827,18 @@ sub scan_datastores { return $response; } + +sub scan_namespaces { + my ($scfg, $datastore, $password, $conn) = @_; + + $conn = pbs_api_connect($scfg, $password) if !defined($conn); + + my $namespaces = eval { $conn->get("/api2/json/admin/datastore/$datastore/namespace", {}); }; + die "error fetching namespaces - $@" if $@; + + return $namespaces; +} + sub check_datastore_exists { my ($class, $storeid, $scfg, $password, $conn) = @_; @@ -833,6 +855,25 @@ sub check_datastore_exists { die "$storeid: Cannot find datastore '$datastore', check permissions and existence!\n"; } +sub check_namespace_exists { + my ($class, $storeid, $scfg, $password, $conn) = @_; + + my $namespace = $scfg->{namespace}; + return 1 if !defined($namespace); + my $datastore = $scfg->{datastore}; + + my $namespaces = eval { scan_namespaces($scfg, $datastore, $password, $conn) }; + die "$storeid: $@" if $@; + + for my $ns (@$namespaces) { + if ($ns->{ns} eq $namespace) { + return 1; + } + } + + die "$storeid: Cannot find namespace '$namespace', check permissions and existence!\n"; +} + sub activate_storage { my ($class, $storeid, $scfg, $cache) = @_; -- 2.39.2 _______________________________________________ pve-devel mailing list pve-devel@lists.proxmox.com https://lists.proxmox.com/cgi-bin/mailman/listinfo/pve-devel