to be able to download 'tar.zst' archives

Signed-off-by: Dominik Csapak <[email protected]>
---
 PVE/API2/Storage/FileRestore.pm | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/PVE/API2/Storage/FileRestore.pm b/PVE/API2/Storage/FileRestore.pm
index 5630f52..1c44b3c 100644
--- a/PVE/API2/Storage/FileRestore.pm
+++ b/PVE/API2/Storage/FileRestore.pm
@@ -156,6 +156,12 @@ __PACKAGE__->register_method ({
                description => 'base64-path to the directory or file to 
download.',
                type => 'string',
            },
+           tar => {
+               description => "Download dirs as 'tar.zst' instead of 'zip'.",
+               type => 'boolean',
+               optional => 1,
+               default => 0,
+           },
        },
     },
     returns => {
@@ -171,6 +177,7 @@ __PACKAGE__->register_method ({
        my $path = extract_param($param, 'filepath');
        my $storeid = extract_param($param, 'storage');
        my $volid = $parse_volname_or_id->($storeid, $param->{volume});
+       my $tar = extract_param($param, 'tar') // 0;
 
        my $cfg = PVE::Storage::config();
        my $scfg = PVE::Storage::storage_config($cfg, $storeid);
@@ -188,7 +195,7 @@ __PACKAGE__->register_method ({
        $rpcenv->fork_worker('pbs-download', undef, $user, sub {
            my $name = decode_base64($path);
            print "Starting download of file: $name\n";
-           $client->file_restore_extract($fifo, [$scfg->{namespace}, $snap], 
$path, 1);
+           $client->file_restore_extract($fifo, [$scfg->{namespace}, $snap], 
$path, 1, $tar);
        });
 
        my $ret = {
-- 
2.30.2



_______________________________________________
pve-devel mailing list
[email protected]
https://lists.proxmox.com/cgi-bin/mailman/listinfo/pve-devel

Reply via email to