debian/0000755000000000000000000000000012241515247007171 5ustar debian/control0000644000000000000000000000121512241514430010564 0ustar Source: libfile-rsyncp-perl Section: perl Priority: optional Maintainer: Ubuntu Developers XSBC-Original-Maintainer: Ludovic Drolez Build-Depends: debhelper (>> 4.0.0), autotools-dev Standards-Version: 3.9.3 Package: libfile-rsyncp-perl Architecture: any Depends: ${shlibs:Depends}, ${misc:Depends}, ${perl:Depends} Description: Perl based implementation of an Rsync client This module provides an API that makes it easy to write short scripts that communicate with a native rsync process or a native rsyncd daemon. . It was initially written to provide an Rsync interface to BackupPC. debian/docs0000644000000000000000000000000712241514073010035 0ustar README debian/watch0000644000000000000000000000027212241514073010217 0ustar version=3 # URL to the package page followed by a regex to search http://search.cpan.org/dist/File-RsyncP/ .*/File-RsyncP-v?(\d[\d.-]+)\.(?:tar(?:\.gz|\.bz2)?|tgz|zip)$ debian uupdate debian/changelog0000644000000000000000000000432312241515212011035 0ustar libfile-rsyncp-perl (0.70-1ubuntu3) trusty; urgency=low * Add patch for IPv6 support. -- Stéphane Graber Fri, 15 Nov 2013 17:04:57 -0500 libfile-rsyncp-perl (0.70-1ubuntu2) trusty; urgency=low * Rebuild for Perl 5.18. -- Colin Watson Mon, 21 Oct 2013 13:17:33 +0100 libfile-rsyncp-perl (0.70-1ubuntu1) saucy; urgency=low * Use dh_autotools-dev to update config.{sub,guess} for AArch64. -- Matthias Klose Thu, 10 Oct 2013 16:38:38 +0200 libfile-rsyncp-perl (0.70-1) unstable; urgency=low * New upstream release * Updated the watch file -- Ludovic Drolez Thu, 10 May 2012 13:43:12 +0200 libfile-rsyncp-perl (0.68-1) unstable; urgency=low * New upstream release * Updated config.guess and .sub. Closes: #401750 -- Ludovic Drolez Mon, 5 Feb 2007 11:19:37 +0100 libfile-rsyncp-perl (0.64-1) unstable; urgency=medium * New upstream release. Fixes the newline problem. Closes: Bug#378329 -- Ludovic Drolez Mon, 9 Oct 2006 13:12:14 +0200 libfile-rsyncp-perl (0.52-1) unstable; urgency=low * New upstream release. Closes: Bug#260263 -- Ludovic Drolez Mon, 19 Jul 2004 22:30:32 +0200 libfile-rsyncp-perl (0.46-1) unstable; urgency=low * New upstream release -- Ludovic Drolez Tue, 9 Mar 2004 22:39:29 +0100 libfile-rsyncp-perl (0.44-2) unstable; urgency=low * debian/watch corrected -- Ludovic Drolez Sun, 5 Oct 2003 12:51:50 +0200 libfile-rsyncp-perl (0.44-1) unstable; urgency=low * New upstream release * added debian/watch -- Ludovic Drolez Sun, 3 Aug 2003 21:12:57 +0200 libfile-rsyncp-perl (0.42-2) unstable; urgency=low * changed section: perl -- Ludovic Drolez Mon, 21 Jul 2003 21:17:10 +0200 libfile-rsyncp-perl (0.42-1) unstable; urgency=low * New upstream release which should compile nicely on s390, ia64, alpha -- Ludovic Drolez Wed, 16 Jul 2003 23:31:59 +0200 libfile-rsyncp-perl (0.41-1) unstable; urgency=low * Initial Release. -- Ludovic Drolez Wed, 18 Jun 2003 12:29:11 +0200 debian/compat0000644000000000000000000000000212241514073010363 0ustar 5 debian/rules0000755000000000000000000000376612241514117010260 0ustar #!/usr/bin/make -f # Sample debian/rules that uses debhelper. # GNU copyright 1997 to 1999 by Joey Hess. # Uncomment this to turn on verbose mode. #export DH_VERBOSE=1 CFLAGS = -Wall -g ifneq (,$(findstring noopt,$(DEB_BUILD_OPTIONS))) CFLAGS += -O0 else CFLAGS += -O2 endif ifeq (,$(findstring nostrip,$(DEB_BUILD_OPTIONS))) INSTALL_PROGRAM += -s endif configure: configure-stamp configure-stamp: dh_testdir # Add here commands to configure the package. dh_autotools-dev_updateconfig perl Makefile.PL INSTALLDIRS=vendor touch configure-stamp build: build-stamp build-stamp: configure-stamp dh_testdir # Add here commands to compile the package. $(MAKE) OPTIMIZE="$(CFLAGS)" CC=gcc LD=gcc #/usr/bin/docbook-to-man debian/libfile-rsyncp.sgml > libfile-rsyncp.1 touch build-stamp clean: dh_testdir dh_testroot rm -f build-stamp configure-stamp # Add here commands to clean up after the build process. -$(MAKE) clean rm -f Makefile.old Digest/Makefile.old FileList/Makefile.old dh_autotools-dev_restoreconfig dh_clean install: build dh_testdir dh_testroot dh_clean -k dh_installdirs # Add here commands to install the package into debian/libfile-rsyncp. $(MAKE) install PREFIX=$(CURDIR)/debian/libfile-rsyncp-perl/usr/ -rmdir $(CURDIR)/debian/libfile-rsyncp-perl/usr/share/perl5/ # Build architecture-independent files here. binary-indep: build install # We have nothing to do by default. # Build architecture-dependent files here. binary-arch: build install dh_testdir dh_testroot dh_installchangelogs Changes dh_installdocs dh_installexamples # dh_install # dh_installmenu # dh_installdebconf # dh_installlogrotate # dh_installemacsen # dh_installpam # dh_installmime # dh_installinit # dh_installcron # dh_installinfo dh_installman dh_link dh_strip dh_compress dh_fixperms dh_perl # dh_python # dh_makeshlibs dh_installdeb dh_shlibdeps dh_gencontrol dh_md5sums dh_builddeb binary: binary-indep binary-arch .PHONY: build clean binary-indep binary-arch binary install configure debian/patches/0000755000000000000000000000000012241515246010617 5ustar debian/patches/add-ipv6-support.diff0000644000000000000000000000256212241514343014577 0ustar Description: Add IPv6 support. Author: Stéphane Graber Origin: vendor Forwarded: yes (by e-mail to upstream and Debian) Last-Update: 2013-11-15 --- libfile-rsyncp-perl-0.70.orig/lib/File/RsyncP.pm +++ libfile-rsyncp-perl-0.70/lib/File/RsyncP.pm @@ -43,6 +43,7 @@ package File::RsyncP; use strict; use Socket; +use Socket6; use File::RsyncP::Digest; use File::RsyncP::FileIO; use File::RsyncP::FileList; @@ -224,13 +225,25 @@ sub serverConnect $port ||= 873; my $proto = getprotobyname('tcp'); - my $iaddr = inet_aton($host) || return "unknown host $host"; - my $paddr = sockaddr_in($port, $iaddr); - alarm($rs->{timeout}) if ( $rs->{timeout} ); - socket(FH, PF_INET, SOCK_STREAM, $proto) - || return "inet socket: $!"; - connect(FH, $paddr) || return "inet connect: $!"; + + my @res = getaddrinfo($host, $port, AF_UNSPEC, SOCK_STREAM); + my $good = 0; + while (scalar(@res) >= 5) { + my ($family, $socktype, $proto, $saddr, $canonname, @res) = @res; + socket(FH, $family, $socktype, $proto) || next; + + $good = 1; + connect(FH, $saddr) && last; + + close(FH); + $good = 0; + } + + if ($good == 0) { + return "connect attempt failed\n"; + } + $rs->{fh} = *FH; $rs->writeData("\@RSYNCD: $rs->{protocol_version}\n", 1); my $line = $rs->getLine; debian/patches/series0000644000000000000000000000002612241514243012026 0ustar add-ipv6-support.diff debian/copyright0000644000000000000000000000201512241514073011116 0ustar This package was debianized by Ludovic Drolez on Wed, 18 Jun 2003 12:29:11 +0200. It was downloaded from http://sourceforge.net/projects/perlrsync/ Upstream Author: Craig Barratt Copyright: This package is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; version 2 dated June, 1991. This package is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this package; if not, write to the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA. On Debian systems, the complete text of the GNU General Public License can be found in `/usr/share/common-licenses/GPL'. debian/libfile-rsyncp.substvars0000644000000000000000000000016312241514073014065 0ustar perl:Depends=perl (>= 5.6.1-8.2) perl:Depends=perlapi-5.6.1, perl (>= 5.6.1-8.2) shlibs:Depends=libc6 (>= 2.2.4-4) debian/source/0000755000000000000000000000000012241515246010470 5ustar debian/source/format0000644000000000000000000000001412241514214011670 0ustar 3.0 (quilt)