diff options
| author | Daniel Stenberg <daniel@haxx.se> | 2001-01-22 16:16:18 +0000 |
|---|---|---|
| committer | Daniel Stenberg <daniel@haxx.se> | 2001-01-22 16:16:18 +0000 |
| commit | 6429c378a2479255f2f5a663758ff87dcec5ddf6 (patch) | |
| tree | b2ab1a773fe9675776a262d14ef12cc5f85803b1 | |
| parent | d830f10417a10074716906298988d211b3e3abae (diff) | |
| download | gnurl-6429c378a2479255f2f5a663758ff87dcec5ddf6.tar.gz gnurl-6429c378a2479255f2f5a663758ff87dcec5ddf6.tar.bz2 gnurl-6429c378a2479255f2f5a663758ff87dcec5ddf6.zip | |
the custom reply engine was not inited properly
| -rw-r--r-- | tests/ftpserver.pl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/tests/ftpserver.pl b/tests/ftpserver.pl index 918df0ca7..c5c7e7b5c 100644 --- a/tests/ftpserver.pl +++ b/tests/ftpserver.pl @@ -76,6 +76,7 @@ my %commandok = ( 'SIZE' => 'loggedin|twosock', 'PWD' => 'loggedin|twosock', 'QUIT' => 'loggedin|twosock', + 'DELE' => 'loggedin|twosock' ); # initially, we're in 'fresh' state @@ -97,6 +98,7 @@ my %displaytext = ('USER' => '331 We are happy you popped in!', 'QUIT' => '221 bye bye baby', # just reply something 'PWD' => '257 "/nowhere/anywhere" is current directory', 'REST' => '350 Yeah yeah we set it there for you', + 'DELE' => '200 OK OK OK whatever you say' ); # callback functions for certain commands @@ -300,6 +302,7 @@ $SIG{CHLD} = \&REAPER; my %customreply; sub customize { + undef %customreply; open(CUSTOM, "<log/ftpserver.cmd") || return 1; @@ -307,7 +310,6 @@ sub customize { print STDERR "FTPD: Getting commands from log/ftpserver.cmd\n"; } - undef %customreply; while(<CUSTOM>) { if($_ =~ /REPLY ([A-Z]+) (.*)/) { $customreply{$1}=$2; |