diff options
Diffstat (limited to 'tests')
-rwxr-xr-x | tests/ftpserver.pl | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/tests/ftpserver.pl b/tests/ftpserver.pl index ac52a496c..ab514e119 100755 --- a/tests/ftpserver.pl +++ b/tests/ftpserver.pl @@ -586,6 +586,7 @@ sub protocolsetup { 'CAPABILITY' => \&CAPABILITY_imap, 'CHECK' => \&CHECK_imap, 'CLOSE' => \&CLOSE_imap, + 'COPY' => \©_imap, 'CREATE' => \&CREATE_imap, 'DELETE' => \&DELETE_imap, 'EXAMINE' => \&EXAMINE_imap, @@ -1239,6 +1240,23 @@ sub EXPUNGE_imap { return 0; } +sub COPY_imap { + my ($args) = @_; + my ($uid, $mailbox) = split(/ /, $args, 2); + fix_imap_params($uid, $mailbox); + + logmsg "COPY_imap got $args\n"; + + if (($uid eq "") || ($mailbox eq "")) { + sendcontrol "$cmdid BAD Command Argument\r\n"; + } + else { + sendcontrol "$cmdid OK COPY completed\r\n"; + } + + return 0; +} + sub LOGOUT_imap { sendcontrol "* BYE cURL IMAP server signing off\r\n"; sendcontrol "$cmdid OK LOGOUT completed\r\n"; |