aboutsummaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
Diffstat (limited to 'tests')
-rwxr-xr-xtests/runtests.pl16
1 files changed, 8 insertions, 8 deletions
diff --git a/tests/runtests.pl b/tests/runtests.pl
index 770ffadcf..1abe2e6a8 100755
--- a/tests/runtests.pl
+++ b/tests/runtests.pl
@@ -617,7 +617,7 @@ sub verifyhttp {
# server runs fine but we cannot talk to it ("Failed to connect to ::1: Can't
# assign requested address" #
-sub verifyftp {
+sub verifyserver {
my ($proto, $ip, $port) = @_;
my $pid;
my $time=time();
@@ -625,7 +625,7 @@ sub verifyftp {
if($proto eq "ftps") {
$extra = "--insecure --ftp-ssl-control ";
}
- my $cmd="$VCURL --max-time $server_response_maxtime --silent --verbose --globoff $extra\"$proto://$ip:$port/verifiedserver\" 2>$LOGDIR/verifyftp";
+ my $cmd="$VCURL --max-time $server_response_maxtime --silent --verbose --globoff $extra\"$proto://$ip:$port/verifiedserver\" 2>$LOGDIR/verifyserver";
# check if this is our server running on this port:
my @data=runclientoutput($cmd);
logmsg "RUN: $cmd\n" if($verbose);
@@ -750,12 +750,12 @@ sub verifysocks {
my %protofunc = ('http' => \&verifyhttp,
'https' => \&verifyhttp,
- 'ftp' => \&verifyftp,
- 'pop3' => \&verifyftp,
- 'imap' => \&verifyftp,
- 'smtp' => \&verifyftp,
- 'ftps' => \&verifyftp,
- 'tftp' => \&verifyftp,
+ 'ftp' => \&verifyserver,
+ 'pop3' => \&verifyserver,
+ 'imap' => \&verifyserver,
+ 'smtp' => \&verifyserver,
+ 'ftps' => \&verifyserver,
+ 'tftp' => \&verifyserver,
'ssh' => \&verifyssh,
'socks' => \&verifysocks);