moparisthebest/wget
1
0
Fork 0
mirror of https://github.com/moparisthebest/wget synced 2024-07-03 16:38:41 -04:00
Code Issues Releases Wiki Activity

use test filename as default test name

Browse Source
This commit is contained in:
Tim Rühsen 2014-10-02 11:26:59 +02:00 committed by Giuseppe Scrivano
parent 21fc7546ef
commit ff876a3710
83 changed files with 89 additions and 148 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
tests/ChangeLog
View File

@ -1,3 +1,8 @@
2014-10-02 Tim Ruehsen <tim.ruehsen@gmx.de>
* tests/WgetTests.pm: use filename as default test name
* tests/Test-*.px: removed redundant 'name => ...'
2014-10-01 Tim Ruehsen <tim.ruehsen@gmx.de> 2014-10-01 Tim Ruehsen <tim.ruehsen@gmx.de>
* tests/Makefile.am: remove run-px, fixing dist-check * tests/Makefile.am: remove run-px, fixing dist-check

4
tests/Test--httpsonly-r.px
View File

@ -68,12 +68,10 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test--httpsonly-r", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);
print $expected_error_code."\n";
exit $the_test->run(); exit $the_test->run();

3
tests/Test--no-content-disposition-trivial.px
View File

@ -45,8 +45,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test--no-content-disposition-trivial", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test--no-content-disposition.px
View File

@ -46,8 +46,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test--no-content-disposition", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test--post-file.px
View File

@ -15,8 +15,7 @@ my $expected_error_code = 3;
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test--post-file", my $the_test = HTTPTest->new (cmdline => $cmdline,
cmdline => $cmdline,
errcode => $expected_error_code); errcode => $expected_error_code);
exit $the_test->run(); exit $the_test->run();

3
tests/Test--spider-fail.px
View File

@ -42,8 +42,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test--spider-fail", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test--spider-r--no-content-disposition-trivial.px
View File

@ -99,8 +99,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test--spider-r--no-content-disposition-trivial", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test--spider-r--no-content-disposition.px
View File

@ -100,8 +100,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test--spider-r--no-content-disposition", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test--spider-r-HTTP-Content-Disposition.px
View File

@ -100,8 +100,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test--spider-r-HTTP-Content-Disposition", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test--spider-r.px
View File

@ -99,8 +99,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test--spider-r", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test--spider.px
View File

@ -42,8 +42,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test--spider", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test--start-pos--continue.px
View File

@ -44,8 +44,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test--start-pos--continue", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
existing => \%existing_files, existing => \%existing_files,

3
tests/Test--start-pos.px
View File

@ -34,8 +34,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test--start-pos", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-204.px
View File

@ -25,8 +25,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-204", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-E-k-K.px
View File

@ -79,8 +79,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-E-k-K", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-E-k.px
View File

@ -76,8 +76,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-E-k", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-HTTP-Content-Disposition-1.px
View File

@ -65,8 +65,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-HTTP-Content-Disposition-1", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
existing => \%existing_files, existing => \%existing_files,

3
tests/Test-HTTP-Content-Disposition-2.px
View File

@ -65,8 +65,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-HTTP-Content-Disposition-2", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
existing => \%existing_files, existing => \%existing_files,

3
tests/Test-HTTP-Content-Disposition.px
View File

@ -46,8 +46,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-HTTP-Content-Disposition", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-N--no-content-disposition-trivial.px
View File

@ -38,8 +38,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-N--no-content-disposition-trivial", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-N--no-content-disposition.px
View File

@ -39,8 +39,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-N--no-content-disposition", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-N-HTTP-Content-Disposition.px
View File

@ -40,8 +40,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-N-HTTP-Content-Disposition", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-N-current.px
View File

@ -54,8 +54,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-N-current", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
existing => \%existing_files, existing => \%existing_files,

3
tests/Test-N-no-info.px
View File

@ -52,8 +52,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-N-no-info", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
existing => \%existing_files, existing => \%existing_files,

3
tests/Test-N-old.px
View File

@ -52,8 +52,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-N-old", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
existing => \%existing_files, existing => \%existing_files,

3
tests/Test-N-smaller.px
View File

@ -55,8 +55,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-N-smaller", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
existing => \%existing_files, existing => \%existing_files,

3
tests/Test-N.px
View File

@ -38,8 +38,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-N", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-O--no-content-disposition-trivial.px
View File

@ -36,8 +36,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-O--no-content-disposition-trivial", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-O--no-content-disposition.px
View File

@ -37,8 +37,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-O--no-content-disposition", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-O-HTTP-Content-Disposition.px
View File

@ -37,8 +37,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-O-HTTP-Content-Disposition", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-O-nc.px
View File

@ -36,8 +36,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-O-nc", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-O-nonexisting.px
View File

@ -36,8 +36,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-O-nonexisting", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-O.px
View File

@ -36,8 +36,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-O", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-Restrict-Lowercase.px
View File

@ -45,8 +45,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-Restrict-Lowercase", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-Restrict-Uppercase.px
View File

@ -45,8 +45,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-Restrict-Uppercase", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-auth-basic.px
View File

@ -38,8 +38,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-auth-basic", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-auth-no-challenge-url.px
View File

@ -39,8 +39,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-auth-no-challenge-url", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-auth-no-challenge.px
View File

@ -40,8 +40,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-auth-no-challenge", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-auth-retcode.px
View File

@ -28,8 +28,7 @@ my %expected_downloaded_files = ();
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-auth-retcode", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-auth-with-content-disposition.px
View File

@ -39,8 +39,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-auth-with-content-disposition", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-c-full.px
View File

@ -46,8 +46,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-c-full", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
existing => \%existing_files, existing => \%existing_files,

3
tests/Test-c-partial.px
View File

@ -56,8 +56,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-c-partial", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
existing => \%existing_files, existing => \%existing_files,

3
tests/Test-c-shorter.px
View File

@ -53,8 +53,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-c-shorter", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
existing => \%existing_files, existing => \%existing_files,

3
tests/Test-c.px
View File

@ -43,8 +43,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-c", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
existing => \%existing_files, existing => \%existing_files,

3
tests/Test-cookies-401.px
View File

@ -42,8 +42,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-cookies-401", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-cookies.px
View File

@ -103,8 +103,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-cookies", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

2
tests/Test-ftp--start-pos.px
View File

@ -29,7 +29,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = FTPTest->new (name => "Test-ftp--start-pos", my $the_test = FTPTest->new (
input => \%urls, input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,

2
tests/Test-ftp-bad-list.px
View File

@ -56,7 +56,7 @@ my %preexisting_files = (
############################################################################### ###############################################################################
my $the_test = FTPTest->new (name => "Test-ftp-bad-list", my $the_test = FTPTest->new (
input => \%urls, input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,

2
tests/Test-ftp-iri-disabled.px
View File

@ -41,7 +41,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = FTPTest->new (name => "Test-ftp-iri-disabled", my $the_test = FTPTest->new (
input => \%urls, input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,

2
tests/Test-ftp-iri-fallback.px
View File

@ -37,7 +37,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = FTPTest->new (name => "Test-ftp-iri-fallback", my $the_test = FTPTest->new (
input => \%urls, input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,

2
tests/Test-ftp-iri-recursive.px
View File

@ -37,7 +37,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = FTPTest->new (name => "Test-ftp-iri-recursive", my $the_test = FTPTest->new (
input => \%urls, input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,

2
tests/Test-ftp-iri.px
View File

@ -38,7 +38,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = FTPTest->new (name => "Test-ftp-iri", my $the_test = FTPTest->new (
input => \%urls, input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,

2
tests/Test-ftp-list-Multinet.px
View File

@ -56,7 +56,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = FTPTest->new (name => "Test-ftp-list-Multinet", my $the_test = FTPTest->new (
input => \%urls, input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,

2
tests/Test-ftp-list-UNIX-hidden.px
View File

@ -55,7 +55,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = FTPTest->new (name => "Test-ftp-list-UNIX-hidden", my $the_test = FTPTest->new (
input => \%urls, input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,

2
tests/Test-ftp-list-Unknown-a.px
View File

@ -66,7 +66,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = FTPTest->new (name => "Test-ftp-list-Unknown-a", my $the_test = FTPTest->new (
input => \%urls, input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,

2
tests/Test-ftp-list-Unknown-hidden.px
View File

@ -58,7 +58,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = FTPTest->new (name => "Test-ftp-list-Unknown-hidden", my $the_test = FTPTest->new (
input => \%urls, input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,

2
tests/Test-ftp-list-Unknown-list-a-fails.px
View File

@ -51,7 +51,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = FTPTest->new (name => "Test-ftp-list-Unknown-list-a-fails", my $the_test = FTPTest->new (
input => \%urls, input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,

2
tests/Test-ftp-list-Unknown.px
View File

@ -54,7 +54,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = FTPTest->new (name => "Test-ftp-list-Unknown", my $the_test = FTPTest->new (
input => \%urls, input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,

2
tests/Test-ftp-pasv-fail.px
View File

@ -46,7 +46,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = FTPTest->new (name => "Test-ftp-pasv-fail", my $the_test = FTPTest->new (
server_behavior => {fail_on_pasv => 1}, server_behavior => {fail_on_pasv => 1},
input => \%urls, input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,

2
tests/Test-ftp-recursive.px
View File

@ -44,7 +44,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = FTPTest->new (name => "Test-ftp-recursive", my $the_test = FTPTest->new (
input => \%urls, input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,

2
tests/Test-ftp.px
View File

@ -34,7 +34,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = FTPTest->new (name => "Test-ftp", my $the_test = FTPTest->new (
input => \%urls, input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,

2
tests/Test-i-ftp.px
View File

@ -69,7 +69,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = FTPTest->new (name => "Test-i-ftp", my $the_test = FTPTest->new (
input => \%urls, input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,

3
tests/Test-i-http.px
View File

@ -81,8 +81,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-i-http", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-idn-cmd-utf8.px
View File

@ -41,8 +41,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-idn-cmd-utf8", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-idn-cmd.px
View File

@ -41,8 +41,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-idn-cmd", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-idn-headers.px
View File

@ -56,8 +56,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-idn-headers", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-idn-meta.px
View File

@ -57,8 +57,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-idn-meta", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-idn-robots-utf8.px
View File

@ -68,8 +68,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-idn-robots-utf8", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-idn-robots.px
View File

@ -93,8 +93,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-idn-robots", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-iri-disabled.px
View File

@ -186,8 +186,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-iri-disabled", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-iri-forced-remote.px
View File

@ -198,8 +198,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-iri-forced-remote", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-iri-list.px
View File

@ -164,8 +164,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-iri-list", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-iri-percent.px
View File

@ -77,8 +77,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-iri-percent", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-iri.px
View File

@ -213,8 +213,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-iri", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-k.px
View File

@ -76,8 +76,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-k", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-meta-robots.px
View File

@ -104,8 +104,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-meta-robots", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-nonexisting-quiet.px
View File

@ -33,8 +33,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-nonexisting-quiet", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-noop.px
View File

@ -46,8 +46,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-noop", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-np.px
View File

@ -138,8 +138,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-np", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-proxy-auth-basic.px
View File

@ -38,8 +38,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-proxy-auth-basic", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-restrict-ascii.px
View File

@ -58,8 +58,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-restrict-ascii", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
output => \%expected_downloaded_files); output => \%expected_downloaded_files);

3
tests/Test-stdouterr.px
View File

@ -36,8 +36,7 @@ my %expected_downloaded_files = (
############################################################################### ###############################################################################
my $the_test = HTTPTest->new (name => "Test-stdouterr", my $the_test = HTTPTest->new (input => \%urls,
input => \%urls,
cmdline => $cmdline, cmdline => $cmdline,
errcode => $expected_error_code, errcode => $expected_error_code,
existing => \%existing_files, existing => \%existing_files,

4
tests/WgetTests.pm
View File

@ -20,7 +20,7 @@ my @unexpected_downloads = ();
_errcode => 0, _errcode => 0,
_existing => {}, _existing => {},
_input => {}, _input => {},
_name => "", _name => $0,
_output => {}, _output => {},
_server_behavior => {}, _server_behavior => {},
); );
@ -70,6 +70,8 @@ sub run {
my $result_message = "Test successful.\n"; my $result_message = "Test successful.\n";
my $errcode; my $errcode;
$self->{_name} =~ s{.*/}{}; # remove path
$self->{_name} =~ s{\.[^.]+$}{}; # remove extension
printf "Running test $self->{_name}\n"; printf "Running test $self->{_name}\n";
# Setup # Setup