For example:
CAPA "SIZE 1048576" 8BITMIME BINARYMIME
will populate the capabilities list with the following in:
SIZE 1048576
8BITMIME
BINARYMIME
}
elsif($_ =~ /CAPA (.*)/) {
logmsg "FTPD: instructed to support CAPABILITY command\n";
- @capabilities = split(/ /, $1);
+ @capabilities = split(/ (?!(?:[^" ]|[^"] [^"])+")/, $1);
+ foreach (@capabilities) {
+ $_ = $1 if /^"(.*)"$/;
+ }
}
elsif($_ =~ /AUTH (.*)/) {
logmsg "FTPD: instructed to support AUTHENTICATION command\n";