Re: [libvirt] [libvirt-perl][PATCH 0/7] Implement sparse streams
On 05/23/2017 06:16 PM, Daniel P. Berrange wrote:
On Tue, May 23, 2017 at 05:05:34PM +0200, Michal Privoznik wrote:
> *** BLURB HERE ***
>
> Michal Privoznik (7):
> Fix send_all() callback helper
> Introduce flags to Stream::recv()
> Introduce Stream::recvHole() and Stream::sendHole()
> Introduce Stream::sparse_recv_all()
> Introduce Stream::sparse_send_all()
> Register VOL_DOWNLOAD_SPARSE_STREAM & VOL_UPLOAD_SPARSE_STREAM
> constants
> examples: Introduce vol-sparse.pl
>
> Changes | 9 ++
> Virt.xs | 241 ++++++++++++++++++++++++++++++++++++++++++++-
> examples/vol-sparse.pl | 142 ++++++++++++++++++++++++++
> lib/Sys/Virt/StorageVol.pm | 30 +++++-
> lib/Sys/Virt/Stream.pm | 70 ++++++++++++-
> t/030-api-coverage.t | 3 +
> 6 files changed, 483 insertions(+), 12 deletions(-)
> create mode 100755 examples/vol-sparse.pl
ACK with the couple of renames suggested
Thank you pushed. With a small bug fix too. In 7/7 in the example in
upload_skip_handler() I cannot return the retval of sysseek as the
return value is read as an integer and when trying to upload large file,
int wraps (at 2GiB) and the file transfer breaks. Obviously.
Michal