view release on metacpan or  search on metacpan

GDiffDelta.pm  view on Meta::CPAN

package Algorithm::GDiffDelta;
use warnings;
use strict;

our $VERSION = '0.01';

require Exporter;
require DynaLoader;
our @ISA = qw( Exporter DynaLoader );
our @EXPORT_OK = qw( gdiff_adler32 gdiff_delta gdiff_apply );
our %EXPORT_TAGS = ( all => \@EXPORT_OK );

bootstrap Algorithm::GDiffDelta;

1;

__END__

=head1 NAME

Algorithm::GDiffDelta - generate and apply GDIFF format binary deltas

=head1 SYNOPSIS

    use Algorithm::GDiffDelta qw(
        gdiff_adler32 gdiff_delta gdiff_apply
    );

    # Pass in two file handles for reading from and one to
    # writing the GDIFF binary delta to:
    gdiff_delta($orig, $changed, $delta);

    # Pass in file handles of original file and GDIFF delta
    # to read from, and file to write reconstructed changed
    # file to:
    gdiff_apply($orig, $delta, $changed);

    # A fast adler32 digest implementation is also available:
    my $adler32 = gdiff_adler32(1, 'some data');
    $adler32 = gdiff_adler32($adler32, 'some more data');

=head1 DESCRIPTION

This module can be used to generate binary deltas describing the
differences between two files.  Given the first file and the
delta the second file can be reconstructed.

A delta is equivalent to the output of the unix C<diff> program,
except that it can efficiently represent the differences between
similar binary files, containing any sequences of bytes.  These
deltas can be used for updating files over a network (as C<rsync>
does) or for efficiently storing a revision history of changes to
a file (as Subversion does).

There are several formats used for binary deltas.  The one supported
by this module is the GDIFF format, which is fairly simple and is
documented as a W3C note (See the SEE ALSO section below).

This module generates and processes deltas using file handles.
It supports both native Perl file handles (created with the built-in
C<open> format) and objects that support the right methods.
For an object to work it must support at least the C<read>, C<seek>,
and C<tell> methods (if it is an input file) or the C<write> method
(if it is an output file).  This allows strings to be used for input
and output, by wrapping them in an L<IO::Scalar|IO::Scalar> object
or similar.  A future version of this module might support reading
and writing directly through references to scalars, because that
should be much more efficient.

See the section ALGORITHM AND DELTA FORMAT below for some notes on
the algorithm used by this module and how the GDIFF delta format works.

=head1 FUNCTIONS

No functions are exported by default.  Pass the function names to
Exporter in the C<use> line, or use the C<:all> tag to import them all.

=over 4

=item gdiff_adler32(I<$initial_value>, I<$string_data>)

Generate an Adler32 digest of the bytes in I<$string_data>, starting
with a hash value of I<$initial_value>.  This function is provided
only because it is used internally and so it might as well be made
available.  It isn't needed for generating or applying binary delta files.

The I<$initial_value> should usually be 1.  The result of calling this
function (which is a 32-bit unsigned integer value) can be passed back
in as a new initial value to checksum some more data.  This allows a
large file to be checksummed in separate chunks.

Another implementation of Adler-32 is provided in the
L<Digest::Adler32|Digest::Adler32> module.