diff options
Diffstat (limited to 'tests')
-rwxr-xr-x | tests/ftpserver.pl | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/tests/ftpserver.pl b/tests/ftpserver.pl index ec7ccbba8..2655575b8 100755 --- a/tests/ftpserver.pl +++ b/tests/ftpserver.pl @@ -829,6 +829,9 @@ sub FETCH_imap { $data[0] = $response; logmsg "return proof we are we\n"; } + elsif ($selected eq "") { + sendcontrol "$cmdid BAD Command received in Invalid state\r\n"; + } else { logmsg "retrieve a mail\n"; @@ -941,8 +944,13 @@ sub STORE_imap { logmsg "STORE_imap got $args\n"; - sendcontrol "* $uid FETCH (FLAGS (\\Seen \\Deleted))\r\n"; - sendcontrol "$cmdid OK STORE completed\r\n"; + if ($selected eq "") { + sendcontrol "$cmdid BAD Command received in Invalid state\r\n"; + } + else { + sendcontrol "* $uid FETCH (FLAGS (\\Seen \\Deleted))\r\n"; + sendcontrol "$cmdid OK STORE completed\r\n"; + } return 0; } |