From: Steve Holme Date: Sat, 7 Sep 2013 18:27:52 +0000 (+0100) Subject: ftpserver.pl: Added support for POP3 DELE command X-Git-Tag: upstream/7.37.1~1343 X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=243ad539fe6e7d2c788e4c5318dd6708923265d2;p=platform%2Fupstream%2Fcurl.git ftpserver.pl: Added support for POP3 DELE command --- diff --git a/tests/ftpserver.pl b/tests/ftpserver.pl index f3c8494..f9031bb 100755 --- a/tests/ftpserver.pl +++ b/tests/ftpserver.pl @@ -560,6 +560,7 @@ sub protocolsetup { 'AUTH' => \&AUTH_pop3, 'RETR' => \&RETR_pop3, 'LIST' => \&LIST_pop3, + 'DELE' => \&DELE_pop3, ); %displaytext = ( 'USER' => '+OK We are happy you popped in!', @@ -1295,6 +1296,21 @@ my @pop3list=( return 0; } +sub DELE_pop3 { + my ($msg) = @_; + + logmsg "DELE_pop3 got $msg\n"; + + if ($msg eq "") { + sendcontrol "-ERR Protocol error\r\n"; + } + else { + sendcontrol "+OK\r\n"; + } + + return 0; +} + ################ ################ FTP commands ################