moparisthebest
/
curl
mirror of https://github.com/moparisthebest/curl
1
0
Fork 0
Code Issues Releases Wiki Activity

the custom reply engine was not inited properly

This commit is contained in:
Daniel Stenberg 2001-01-22 16:16:18 +00:00
parent d830f10417
commit 6429c378a2
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
tests/ftpserver.pl
View File

@ -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;