From: Steve Holme <steve_holme@hotmail.com>
Date: Wed, 11 Sep 2013 17:07:25 +0000 (+0100)
Subject: ftpserver.pl: Added support for POP3 RSET command
X-Git-Tag: curl-7_33_0~110
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=5840c918d5393876c651b32e875970613c95775d;p=thirdparty%2Fcurl.git

ftpserver.pl: Added support for POP3 RSET command
---

diff --git a/tests/ftpserver.pl b/tests/ftpserver.pl
index 1c63a308e7..9c4d153720 100755
--- a/tests/ftpserver.pl
+++ b/tests/ftpserver.pl
@@ -563,6 +563,7 @@ sub protocolsetup {
             'NOOP' => \&NOOP_pop3,
             'QUIT' => \&QUIT_pop3,
             'RETR' => \&RETR_pop3,
+            'RSET' => \&RSET_pop3,
             'STAT' => \&STAT_pop3,
             'TOP'  => \&TOP_pop3,
             'UIDL' => \&UIDL_pop3,
@@ -1456,6 +1457,25 @@ sub TOP_pop3 {
     return 0;
 }
 
+sub RSET_pop3 {
+    my ($args) = @_;
+
+    if ($args) {
+        sendcontrol "-ERR Protocol error\r\n";
+    }
+    else {
+        if (@deleted) {
+            logmsg "resetting @deleted message(s)\n";
+
+            @deleted = ();
+        }
+
+        sendcontrol "+OK\r\n";
+    }
+
+    return 0;
+}
+
 sub QUIT_pop3 {
     if(@deleted) {
         logmsg "deleting @deleted message(s)\n";