OpenPKG CVS Repository
http://cvs.openpkg.org/
____________________________________________________________________________
Server: cvs.openpkg.org Name: Thomas Lotterer
Root: /v/openpkg/cvs Email: [EMAIL PROTECTED]
Module: openpkg-src Date: 09-Aug-2005 22:34:55
Branch: HEAD Handle: 2005080921345500
Added files:
openpkg-src/vcheck vcheck.patch
Modified files:
openpkg-src/vcheck vcheck.spec
Log:
add vcheck feature: retry failed FTP URLs using passive mode
Summary:
Revision Changes Path
1.1 +23 -0 openpkg-src/vcheck/vcheck.patch
1.17 +3 -1 openpkg-src/vcheck/vcheck.spec
____________________________________________________________________________
patch -p0 <<'@@ .'
Index: openpkg-src/vcheck/vcheck.patch
============================================================================
$ cvs diff -u -r0 -r1.1 vcheck.patch
--- /dev/null 2005-08-09 22:34:50 +0200
+++ vcheck.patch 2005-08-09 22:34:55 +0200
@@ -0,0 +1,23 @@
+Feature: retry failed FTP URLs using passive mode
+
+--- vcheck.orig 2005-03-20 20:05:19 +0100
++++ vcheck 2005-08-09 18:05:06 +0200
+@@ -1435,6 +1436,7 @@
+ sub read_url($;$$) # &read_url $url [$outfile [$referrer]]
+ {
+ local($i, $t) = (1, time);
++ local($isftp) = (@_->[0] =~ m|^ftp://|i);
+
+ sub meter($$$)
+ {
+@@ -1460,7 +1463,9 @@
+ $xfersum += length $_;
+ $_
+ } else {
+- local $_ = $ua->request($req);
++ local $_;
++ delete %ENV->{FTP_PASSIVE}; $_ = $ua->request($req);
++ $ENV{FTP_PASSIVE}=1; $_ = $ua->request($req) if($isftp and
$_->{_headers}->{content-length} == 0);
+ $xfersum += length($_->headers) + length $_->content;
+ $_->content
+ }
@@ .
patch -p0 <<'@@ .'
Index: openpkg-src/vcheck/vcheck.spec
============================================================================
$ cvs diff -u -r1.16 -r1.17 vcheck.spec
--- openpkg-src/vcheck/vcheck.spec 24 Mar 2005 11:20:38 -0000 1.16
+++ openpkg-src/vcheck/vcheck.spec 9 Aug 2005 20:34:55 -0000 1.17
@@ -33,10 +33,11 @@
Group: Network
License: Artistic
Version: 1.2.1
-Release: 20040207
+Release: 20050809
# list of sources
Source0:
http://www.tu-ilmenau.de/~gomar/stuff/vcheck/vcheck-%{version}.tar.gz
+Patch0: vcheck.patch
# build information
Prefix: %{l_prefix}
@@ -61,6 +62,7 @@
%prep
%setup -q
+ %patch -p0
%build
%{l_prefix}/bin/pod2man vcheck >vcheck.1
@@ .
______________________________________________________________________
The OpenPKG Project www.openpkg.org
CVS Repository Commit List [email protected]
