From c9617d9f9303b8cb77d313716d7cdfa8ccea8d60 Mon Sep 17 00:00:00 2001
From: Steve Holme <steve_holme@hotmail.com>
Date: Sun, 8 Sep 2013 16:41:12 +0100
Subject: [PATCH] ftpserver.pl: Added support for POP3 NOOP command

---
 tests/ftpserver.pl | 14 ++++++++++++++
 1 file changed, 14 insertions(+)

diff --git a/tests/ftpserver.pl b/tests/ftpserver.pl
index 9b89e91ef..7fac030f0 100755
--- a/tests/ftpserver.pl
+++ b/tests/ftpserver.pl
@@ -560,6 +560,7 @@ sub protocolsetup {
             'CAPA' => \&CAPA_pop3,
             'DELE' => \&DELE_pop3,
             'LIST' => \&LIST_pop3,
+            'NOOP' => \&NOOP_pop3,
             'QUIT' => \&QUIT_pop3,
             'RETR' => \&RETR_pop3,
             'STAT' => \&STAT_pop3,
@@ -1326,6 +1327,19 @@ sub STAT_pop3 {
     return 0;
 }
 
+sub NOOP_pop3 {
+    my ($args) = @_;
+
+    if ($args) {
+        sendcontrol "-ERR Protocol error\r\n";
+    }
+    else {
+        sendcontrol "+OK\r\n";
+    }
+
+    return 0;
+}
+
 sub QUIT_pop3 {
     sendcontrol "+OK byebye\r\n";