From: Steve Holme <steve_holme@hotmail.com>
Date: Sat, 14 Sep 2013 09:44:21 +0000 (+0100)
Subject: ftpserver.pl: Added support for IMAP NOOP command
X-Git-Tag: upstream/7.37.1~1292
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=4f4dc5832d5831eec64fe7dd605e1f24bc555a30;p=platform%2Fupstream%2Fcurl.git

ftpserver.pl: Added support for IMAP NOOP command
---

diff --git a/tests/ftpserver.pl b/tests/ftpserver.pl
index 800aa97..6f099b1 100755
--- a/tests/ftpserver.pl
+++ b/tests/ftpserver.pl
@@ -595,6 +595,7 @@ sub protocolsetup {
             'LIST'       => \&LIST_imap,
             'LSUB'       => \&LSUB_imap,
             'LOGOUT'     => \&LOGOUT_imap,
+            'NOOP'       => \&NOOP_imap,
             'RENAME'     => \&RENAME_imap,
             'SEARCH'     => \&SEARCH_imap,
             'SELECT'     => \&SELECT_imap,
@@ -1331,6 +1332,29 @@ sub UID_imap {
     return 0;
 }
 
+sub NOOP_imap {
+    my ($args) = @_;
+    my @data = (
+        "* 22 EXPUNGE\r\n",
+        "* 23 EXISTS\r\n",
+        "* 3 RECENT\r\n",
+        "* 14 FETCH (FLAGS (\\Seen \\Deleted))\r\n",
+    );
+
+    if ($args) {
+        sendcontrol "$cmdid BAD Command Argument\r\n";
+    }
+    else {
+        for my $d (@data) {
+            sendcontrol $d;
+        }
+
+        sendcontrol "$cmdid OK NOOP completed\r\n";
+    }
+
+    return 0;
+}
+
 sub LOGOUT_imap {
     sendcontrol "* BYE cURL IMAP server signing off\r\n";
     sendcontrol "$cmdid OK LOGOUT completed\r\n";