proxmox-mirrors/qemu-server
1
0
Fork 0
mirror of https://git.proxmox.com/git/qemu-server synced 2025-08-13 21:15:25 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

bwlimit: add parameter to qemu_drive_mirror

Browse Source 
used for online drive migrations, move_disk and clone calls.

Signed-off-by: Stoiko Ivanov <s.ivanov@proxmox.com>
This commit is contained in:
Stoiko Ivanov 2019-04-01 11:30:59 +02:00 committed by Thomas Lamprecht
parent ddd664d739
commit 9fa05d31de
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
PVE/QemuServer.pm
View File

@ -6728,7 +6728,7 @@ sub qemu_img_format {
} }
sub qemu_drive_mirror { sub qemu_drive_mirror {
my ($vmid, $drive, $dst_volid, $vmiddst, $is_zero_initialized, $jobs, $skipcomplete, $qga) = @_; my ($vmid, $drive, $dst_volid, $vmiddst, $is_zero_initialized, $jobs, $skipcomplete, $qga, $bwlimit) = @_;
$jobs = {} if !$jobs; $jobs = {} if !$jobs;
@ -6755,7 +6755,12 @@ sub qemu_drive_mirror {
my $opts = { timeout => 10, device => "drive-$drive", mode => "existing", sync => "full", target => $qemu_target }; my $opts = { timeout => 10, device => "drive-$drive", mode => "existing", sync => "full", target => $qemu_target };
$opts->{format} = $format if $format; $opts->{format} = $format if $format;
print "drive mirror is starting for drive-$drive\n"; if (defined($bwlimit)) {
my $bwlimit_bps = $opts->{speed} = $bwlimit * 1024;
print "drive mirror is starting for drive-$drive with bandwidth limit: ${bwlimit}KB/s\n";
} else {
print "drive mirror is starting for drive-$drive\n";
}
# if a job already runs for this device we get an error, catch it for cleanup # if a job already runs for this device we get an error, catch it for cleanup
eval { vm_mon_cmd($vmid, "drive-mirror", %$opts); }; eval { vm_mon_cmd($vmid, "drive-mirror", %$opts); };