summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--tests/ftp.pm18
1 files changed, 9 insertions, 9 deletions
diff --git a/tests/ftp.pm b/tests/ftp.pm
index 3bacb6f35..0f4976c7c 100644
--- a/tests/ftp.pm
+++ b/tests/ftp.pm
@@ -25,7 +25,7 @@ use strict;
use warnings;
use serverhelp qw(
- servername_str
+ servername_id
mainsockf_pidfilename
datasockf_pidfilename
);
@@ -178,19 +178,19 @@ sub killpid {
#
sub killsockfilters {
my ($proto, $ipvnum, $idnum, $verbose) = @_;
- my $srvrname;
+ my $server;
my $pidfile;
my $pid;
return if($proto !~ /^(ftp|imap|pop3|smtp)$/);
- $srvrname = servername_str($proto, $ipvnum, $idnum) if($verbose);
+ $server = servername_id($proto, $ipvnum, $idnum) if($verbose);
- $pidfile = "./". mainsockf_pidfilename($proto, $ipvnum, $idnum);
+ $pidfile = mainsockf_pidfilename($proto, $ipvnum, $idnum);
$pid = processexists($pidfile);
if($pid > 0) {
- printf("* kill pid for %s => %d\n", "${srvrname}-CTRL", $pid)
- if($verbose);
+ printf("* kill pid for %s-%s => %d\n", $server,
+ ($proto eq 'ftp')?'ctrl':'filt', $pid) if($verbose);
kill("KILL", $pid);
waitpid($pid, 0);
}
@@ -198,11 +198,11 @@ sub killsockfilters {
return if($proto ne 'ftp');
- $pidfile = "./". datasockf_pidfilename($proto, $ipvnum, $idnum);
+ $pidfile = datasockf_pidfilename($proto, $ipvnum, $idnum);
$pid = processexists($pidfile);
if($pid > 0) {
- printf("* kill pid for %s => %d\n", "${srvrname}-DATA", $pid)
- if($verbose);
+ printf("* kill pid for %s-data => %d\n", $server,
+ $pid) if($verbose);
kill("KILL", $pid);
waitpid($pid, 0);
}