diff options
| author | Steve Holme <steve_holme@hotmail.com> | 2013-10-19 12:20:00 +0100 |
|---|---|---|
| committer | Steve Holme <steve_holme@hotmail.com> | 2013-10-19 12:20:00 +0100 |
| commit | 1034aa6680ba7dd88306fee036c1e543d8026543 (patch) | |
| tree | a790972d3a2020a2de9f3de58438c1de9ba81e17 /tests/ftpserver.pl | |
| parent | 4be0af7f7464ba906dfedede53e0eda10d43bbdd (diff) | |
| download | gnurl-1034aa6680ba7dd88306fee036c1e543d8026543.tar.gz gnurl-1034aa6680ba7dd88306fee036c1e543d8026543.tar.bz2 gnurl-1034aa6680ba7dd88306fee036c1e543d8026543.zip | |
tests: Added POP3 APOP authentication test
Diffstat (limited to 'tests/ftpserver.pl')
| -rwxr-xr-x | tests/ftpserver.pl | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/tests/ftpserver.pl b/tests/ftpserver.pl index 7efc8be04..d0986ea77 100755 --- a/tests/ftpserver.pl +++ b/tests/ftpserver.pl @@ -1640,7 +1640,10 @@ sub APOP_pop3 { my ($args) = @_; my ($user, $secret) = split(/ /, $args, 2); - if (($user eq "") || ($secret eq "")) { + if (!grep /^APOP$/, @capabilities) { + sendcontrol "-ERR Unrecognized command\r\n"; + } + elsif (($user eq "") || ($secret eq "")) { sendcontrol "-ERR Protocol error\r\n"; } else { |