This commit adds support for the "backup+meta" export format. When this format is used, the notes and protection flag of the backup are included in the metadata header.
Signed-off-by: Filip Schauer <[email protected]> --- src/PVE/API2/Storage/Content.pm | 11 +++++++++-- src/PVE/Storage/Plugin.pm | 25 ++++++++++++++++++++++++- 2 files changed, 33 insertions(+), 3 deletions(-) diff --git a/src/PVE/API2/Storage/Content.pm b/src/PVE/API2/Storage/Content.pm index c69b859..cfe4f2f 100644 --- a/src/PVE/API2/Storage/Content.pm +++ b/src/PVE/API2/Storage/Content.pm @@ -544,7 +544,8 @@ __PACKAGE__->register_method({ permissions => { description => "If the --delete option is used, the 'Datastore.Allocate' privilege is" . " required on the source storage." - . " Without --delete, 'Datastore.AllocateSpace' is required on the target storage.", + . " Without --delete, 'Datastore.AllocateSpace' is required on the target storage." + . " When moving a backup, 'VM.Backup' is required on the VM or container.", user => 'all', }, protected => 1, @@ -610,7 +611,7 @@ __PACKAGE__->register_method({ die "use pct move-volume or qm disk move\n" if $vtype eq 'images' || $vtype eq 'rootdir'; die "moving volume of type '$vtype' not implemented\n" - if !grep { $vtype eq $_ } qw(import iso snippets vztmpl); + if !grep { $vtype eq $_ } qw(backup import iso snippets vztmpl); my $rpcenv = PVE::RPCEnvironment::get(); my $user = $rpcenv->get_user(); @@ -619,6 +620,12 @@ __PACKAGE__->register_method({ if ($delete) { $rpcenv->check($user, "/storage/$src_storeid", ["Datastore.Allocate"]); + + if ($vtype eq 'backup') { + my $protected = + PVE::Storage::get_volume_attribute($cfg, $src_volid, 'protected'); + die "cannot delete protected backup\n" if $protected; + } } $rpcenv->check($user, "/storage/$dst_storeid", ["Datastore.AllocateSpace"]); diff --git a/src/PVE/Storage/Plugin.pm b/src/PVE/Storage/Plugin.pm index 29628ed..92c4820 100644 --- a/src/PVE/Storage/Plugin.pm +++ b/src/PVE/Storage/Plugin.pm @@ -2114,6 +2114,17 @@ sub volume_export { format => $data_format, }; + if ($vtype eq 'backup') { + $meta->{protected} = + $class->get_volume_attribute($scfg, $storeid, $volname, 'protected') + ? JSON::true + : JSON::false; + $meta->{notes} = Encode::encode( + 'utf8', + $class->get_volume_attribute($scfg, $storeid, $volname, 'notes'), + ) // ""; + } + write_meta_header($fh, $meta); write_common_header($fh, $size); if ($data_format =~ /^(raw|ova|ovf|qcow2|vmdk)$/) { @@ -2157,6 +2168,7 @@ sub volume_export_formats { return (); } return ("$vtype+meta", 'tar+size') if $format eq 'subvol'; + return ('backup+meta') if $vtype eq 'backup'; return ("$vtype+meta", 'raw+size') if $vtype =~ /^(iso|snippets|vztmpl|import)$/; } return (); @@ -2252,7 +2264,7 @@ sub volume_import { warn $@ if $@; die $err; } - } elsif (grep { $vtype eq $_ } qw(import iso snippets vztmpl)) { + } elsif (grep { $vtype eq $_ } qw(import iso snippets vztmpl backup)) { eval { run_command(['dd', "of=$file", 'conv=excl', 'bs=64k'], input => '<&' . fileno($fh)); }; @@ -2263,6 +2275,16 @@ sub volume_import { } die $err; } + + if ($vtype eq 'backup' && defined($meta)) { + if (defined($meta->{notes})) { + my $notes = Encode::decode('utf8', $meta->{notes}); + $class->update_volume_attribute($scfg, $storeid, $volname, 'notes', $notes); + } + + $class->update_volume_attribute($scfg, $storeid, $volname, 'protected', 1) + if $meta->{protected}; + } } else { die "importing volume of type '$vtype' not implemented\n"; } @@ -2280,6 +2302,7 @@ sub volume_import_formats { return (); } return ("$vtype+meta", 'tar+size') if $format eq 'subvol'; + return ('backup+meta') if $vtype eq 'backup'; return ("$vtype+meta", 'raw+size') if $vtype =~ /^(iso|snippets|vztmpl|import)$/; } return (); -- 2.47.3 _______________________________________________ pve-devel mailing list [email protected] https://lists.proxmox.com/cgi-bin/mailman/listinfo/pve-devel
